TakeV/guix
1
0
Fork 0
Code Issues Pull requests Packages Projects Releases Wiki Activity

gnu: emacs-lispy: Improve package style.

Browse source 
* gnu/packages/emacs-xyz.scm (emacs-lispy)[arguments]: Use
G-expressions.  Remove trailing #T.
This commit is contained in:
Nicolas Goaziou 2022-02-18 21:32:51 +01:00
parent 587d10be06
commit 8e7b091c29
No known key found for this signature in database
GPG key ID: DA00B4F048E92F2D
1 changed files with 24 additions and 25 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

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

@ -9630,31 +9630,30 @@ (define-public emacs-lispy
(native-inputs
(list which emacs-clojure-mode emacs-undercover))
(arguments
`(#:include (cons* "^lispy-clojure\\.clj$"
"^lispy-python\\.py$"
%default-include)
#:phases
;; XXX: Some failing tests
(modify-phases %standard-phases
(add-before 'check 'make-test-writable
(lambda _
(make-file-writable "lispy-test.el")
#t))
(add-before 'check 'remove-failing-test
(lambda _
(emacs-batch-edit-file "lispy-test.el"
`(progn
(dolist (test '("lispy-eval-python-str" "lispy--clojure-dot-object"))
(goto-char (point-min))
(re-search-forward
(concat "ert-deftest " test))
(beginning-of-line)
(kill-sexp))
(basic-save-buffer)))
#t)))
#:tests? #t
;; Set BEMACS to prevent the test suite from loading straight.el.
#:test-command '("make" "test" "BEMACS=emacs -batch")))
(list
#:include #~(cons* "^lispy-clojure\\.clj$"
"^lispy-python\\.py$"
%default-include)
#:phases
;; XXX: Some failing tests
#~(modify-phases %standard-phases
(add-before 'check 'make-test-writable
(lambda _
(make-file-writable "lispy-test.el")))
(add-before 'check 'remove-failing-test
(lambda _
(emacs-batch-edit-file "lispy-test.el"
`(progn
(dolist (test '("lispy-eval-python-str" "lispy--clojure-dot-object"))
(goto-char (point-min))
(re-search-forward
(concat "ert-deftest " test))
(beginning-of-line)
(kill-sexp))
(basic-save-buffer))))))
#:tests? #t
;; Set BEMACS to prevent the test suite from loading straight.el.
#:test-command #~(list "make" "test" "BEMACS=emacs -batch")))
(synopsis "Modal S-expression editing")
(description
"Due to the structure of Lisp syntax it's very rare for the programmer