me/guix
Archived
1
0
Fork 0
Code Activity

gnu: emacs-sly-stepper: Update to 20200106.

Browse source 
* gnu/packages/emacs-xyz.scm (emacs-sly-stepper): Update to 20200106.
[arguments]: Remove convoluted part of the workaround to load agnostic-lizard
now that upstream has cleaned up the code.
This commit is contained in:
Pierre Neidhardt 2021-01-07 16:35:59 +01:00
parent cf7035dea0
commit fc62833b7f
No known key found for this signature in database
GPG key ID: 9BDCF497A4BBCC7F
1 changed files with 6 additions and 13 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

19
gnu/packages/emacs-xyz.scm
View file

@ -9736,7 +9736,7 @@ inside the source file.")
(license license:gpl3+)))) (license license:gpl3+))))
(define-public emacs-sly-stepper (define-public emacs-sly-stepper
(let ((commit "cd7fd00f9a701246e2a9ba8c37166dcae2fde04e")) (let ((commit "ec3c0a7f3c8b82926882e5fcfdacf67b86d989f8"))
(package (package
(name "emacs-sly-stepper") (name "emacs-sly-stepper")
(version (git-version "0.0.0" "1" commit)) (version (git-version "0.0.0" "1" commit))
@ -9750,7 +9750,7 @@ inside the source file.")
(file-name (git-file-name name version)) (file-name (git-file-name name version))
(sha256 (sha256
(base32 (base32
"09ll9dv8fd5dgnki82hcd48nm4qdzzn8wpva0zzr69zkjwzf9v25")))) "1hxniaxifdw3m4y4yssgy22xcmmf558wx7rpz66wy5hwybjslf7b"))))
(build-system emacs-build-system) (build-system emacs-build-system)
(inputs (inputs
`(("cl-agnostic-lizard" ,cl-agnostic-lizard))) `(("cl-agnostic-lizard" ,cl-agnostic-lizard)))
@ -9780,18 +9780,11 @@ inside the source file.")
"/share/common-lisp/systems/agnostic-lizard.asd"))) "/share/common-lisp/systems/agnostic-lizard.asd")))
;; agnostic-lizard is found at runtime. ;; agnostic-lizard is found at runtime.
(substitute* file (substitute* file
(("\\(funcall \\(read-from-string \"asdf:load-system\"\\)") (("\\(require :asdf\\)")
(string-append (string-append
"(funcall (read-from-string \"asdf:load-asd\") \"" "(require :asdf)\n"
asd " (funcall (read-from-string \"asdf:load-asd\")\n"
"\")\n (funcall (read-from-string \"asdf:load-system\")")) " \"" asd "\")\n")))))))))
;; Upstream mistakenly requires Quicklisp. See
;; https://github.com/joaotavora/sly-stepper/issues/2.
(("\\(funcall \\(read-from-string \"ql:quickload\"\\)")
(string-append
"(ignore-errors (funcall (read-from-string \"ql:quickload\") "
":agnostic-lizard))"))
((" :agnostic-lizard\\)") ""))))))))
(synopsis "Portable Common Lisp stepper interface for Emacs") (synopsis "Portable Common Lisp stepper interface for Emacs")
(description (description
"This package features a new, portable, visual stepping facility for "This package features a new, portable, visual stepping facility for