guix_mirror_bot pushed a commit to branch master
in repository guix.
commit 393c97e1533185b46201c9ef3a139c3e31af0a7f
Author: Cayetano Santos <[email protected]>
AuthorDate: Tue Jun 24 15:06:53 2025 +0200
gnu: emacs-smartparens: Add tests.
* gnu/packages/emacs-xyz.scm (emacs-smartparens): Add tests.
[source]: Remove not basic tests.
[native-inputs]: Add yasnippet and ert-runner.
Change-Id: Ic562da9b454babdcc08011048497cfc74cb8d8a6
Signed-off-by: Hilton Chain <[email protected]>
---
gnu/packages/emacs-xyz.scm | 37 +++++++++++++++++++++++++++++++++++++
1 file changed, 37 insertions(+)
diff --git a/gnu/packages/emacs-xyz.scm b/gnu/packages/emacs-xyz.scm
index a8ae38bc67..cd0c674fce 100644
--- a/gnu/packages/emacs-xyz.scm
+++ b/gnu/packages/emacs-xyz.scm
@@ -14468,9 +14468,46 @@ placed at the margin of the minibuffer for your
completion candidates.")
(url "https://github.com/Fuco1/smartparens";)
(commit commit)))
(file-name (git-file-name name version))
+ (modules '((guix build utils)
+ (ice-9 ftw)
+ (srfi srfi-26)))
+ (snippet
+ '(begin
+ ;; Taken from nextpnr package.
+ (define (delete-all-but directory . preserve)
+ (with-directory-excursion directory
+ (let* ((pred
+ (negate (cut member <> (append '("." "..")
preserve))))
+ (items (scandir "." pred)))
+ (for-each delete-file items))))
+ ;; Only activate basic tests.
+ (delete-all-but "test"
+ "test-helper.el"
+ "smartparens-advice-test.el"
+ "smartparens-delete-pair-test.el"
+ "smartparens-elisp-test.el"
+ "smartparens-framework-test.el"
+ "smartparens-get-comment-bounds-test.el"
+ "smartparens-get-paired-expression-elisp-test.el"
+ "smartparens-get-prefix-test.el"
+
"smartparens-get-stringlike-expression-elisp-test.el"
+
"smartparens-get-stringlike-expression-python-test.el"
+ "smartparens-get-stringlike-expression-test.el"
+ "smartparens-get-suffix-test.el"
+
"smartparens-insertion-specification-parser-test.el"
+ "smartparens-markdown-test.el"
+ "smartparens-movement-test.el"
+ "smartparens-org-test.el"
+ "smartparens-region-ok-test.el"
+ "smartparens-rst-test.el"
+ "smartparens-search-fn-test.el"
+ "smartparens-settings-sp-pair-test.el"
+ "smartparens-skip-closing-pair-test.el")))
(sha256
(base32 "1nfd10kxd1l8bmxhaghhxphl424yg5qn6xcqaligwc3b406b566w"))))
(build-system emacs-build-system)
+ (native-inputs
+ (list emacs-ert-runner emacs-yasnippet))
(propagated-inputs
(list emacs-dash emacs-markdown-mode))
(home-page "https://github.com/Fuco1/smartparens";)
