gnu: emacs-lispy: Improve package style.

* 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

View file

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