[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
02/02: gnu: emacs-lispyville: Enable tests.
From: |
guix-commits |
Subject: |
02/02: gnu: emacs-lispyville: Enable tests. |
Date: |
Sat, 21 Sep 2019 00:40:01 -0400 (EDT) |
leungbk pushed a commit to branch master
in repository guix.
commit 82b545711823f6afc882331a150f45f3df14360d
Author: Brian Leung <address@hidden>
Date: Sat Sep 21 06:24:28 2019 +0200
gnu: emacs-lispyville: Enable tests.
* gnu/packages/emacs-xyz.scm (emacs-lispyville): Enable tests.
---
gnu/packages/emacs-xyz.scm | 19 +++++++++++++++++++
1 file changed, 19 insertions(+)
diff --git a/gnu/packages/emacs-xyz.scm b/gnu/packages/emacs-xyz.scm
index ad53eba..98b5347 100644
--- a/gnu/packages/emacs-xyz.scm
+++ b/gnu/packages/emacs-xyz.scm
@@ -5347,6 +5347,25 @@ S-expression.")
`(("emacs-evil" ,emacs-evil)
("emacs-lispy" ,emacs-lispy)))
(build-system emacs-build-system)
+ (arguments
+ `(#:phases
+ ;; XXX: mysterious whitespace issue with one test
+ (modify-phases %standard-phases
+ (add-before 'check 'make-test-writable
+ (lambda _
+ (make-file-writable "lispyville-test.el")
+ #t))
+ (add-after 'make-test-writable 'remove-test
+ (lambda _
+ (emacs-batch-edit-file "lispyville-test.el"
+ `(progn (progn (goto-char (point-min))
+ (re-search-forward
+ "ert-deftest
lispyville-comment-and-clone-dwim")
+ (beginning-of-line)
+ (kill-sexp))
+ (basic-save-buffer))))))
+ #:tests? #t
+ #:test-command '("make" "test")))
(synopsis "Minor mode for integrating Evil with lispy")
(description
"LispyVille's main purpose is to provide a Lisp editing environment