diff options
author | Pierre Neidhardt <mail@ambrevar.xyz> | 2020-03-07 17:11:49 +0100 |
---|---|---|
committer | Pierre Neidhardt <mail@ambrevar.xyz> | 2020-03-07 17:12:35 +0100 |
commit | 262d6ed4652f7274af8f0ec0a8d32f9e895c417f (patch) | |
tree | b6abe7ed79d777b289fe492588d0e319ed378cd2 | |
parent | 322ea25c5685b1383e0d9d11aec1e6f528aaf1e7 (diff) |
gnu: next: Fix build with SBCL 2.0.2.
* gnu/packages/web-browsers.scm (next)[arguments]: Fix lambda-list type error
on SBCL 2.0.2.
-rw-r--r-- | gnu/packages/web-browsers.scm | 12 |
1 files changed, 11 insertions, 1 deletions
diff --git a/gnu/packages/web-browsers.scm b/gnu/packages/web-browsers.scm index c68c91170b..8a6ffaeef1 100644 --- a/gnu/packages/web-browsers.scm +++ b/gnu/packages/web-browsers.scm @@ -575,7 +575,17 @@ key-bindings and is fully configurable and extensible in Common Lisp.") (format #t "~a" ,(package-version next-gtk-webkit)))) (invoke "make" "install-assets" (string-append "PREFIX=" - (assoc-ref outputs "out")))))))) + (assoc-ref outputs "out"))))) + (add-after 'unpack 'fix-lambda-list + ;; Starting from SBCL 2.0.2, Next 1.5.0 won't build + ;; because of a weird lambda list type. + (lambda _ + (substitute* "source/keymap.lisp" + (("^\\(declaim .* define-key\\)\\)") "")) + (substitute* "source/search-buffer.lisp" + (("define-key :keymap keymap \"C-s\"") "define-key \"C-s\"") + (("\\(update-selection-highlight-hint :follow t :scroll t\\)\\)\\)") + "(update-selection-highlight-hint :follow t :scroll t)) :keymap keymap)"))))))) (inputs `(("alexandria" ,sbcl-alexandria) ("bordeaux-threads" ,sbcl-bordeaux-threads) |