mirror of
https://git.in.rschanz.org/ryan77627/guix.git
synced 2024-12-26 22:38:07 -05:00
gnu: emacs-adoc-mode: Enable tests.
* gnu/packages/emacs-xyz.scm (emacs-adoc-mode)[source]: Fetch sources from Git, as there are no tests in the MELPA release. [arguments]: Enable tests and specify the test command. {phases}: Add a 'disable-failing-tests phase.
This commit is contained in:
parent
23c5c8e4e4
commit
44d1cce557
1 changed files with 32 additions and 4 deletions
|
@ -15869,13 +15869,41 @@ (define-public emacs-adoc-mode
|
|||
(version "0.6.6")
|
||||
(source
|
||||
(origin
|
||||
(method url-fetch)
|
||||
(uri (string-append "https://stable.melpa.org/packages/adoc-mode-"
|
||||
version ".el"))
|
||||
(method git-fetch)
|
||||
(uri (git-reference
|
||||
(url "https://github.com/sensorflo/adoc-mode.git")
|
||||
(commit (string-append "V" version))))
|
||||
(file-name (git-file-name name version))
|
||||
(sha256
|
||||
(base32
|
||||
"1c6hrgxxsnl2c19rgjykpm7r4xg9lp6bmk5z6bi7g8pqlrgwffcy"))))
|
||||
"0kp2aafjhqxz3mjr9hkkss85r4n51chws5a2qj1xzb63dh36liwm"))))
|
||||
(build-system emacs-build-system)
|
||||
(arguments
|
||||
`(#:phases
|
||||
(modify-phases %standard-phases
|
||||
;; See: https://github.com/sensorflo/adoc-mode/issues/39.
|
||||
(add-after 'unpack 'disable-failing-tests
|
||||
(lambda _
|
||||
(let-syntax
|
||||
((disable-tests
|
||||
(syntax-rules ()
|
||||
((_ file ())
|
||||
(syntax-error "test names list must not be empty"))
|
||||
((_ file (test-name ...))
|
||||
(substitute* file
|
||||
(((string-append "^\\(ert-deftest " test-name ".*") all)
|
||||
(string-append all "(skip-unless nil)\n")) ...)))))
|
||||
(disable-tests "adoc-mode-test.el"
|
||||
("adoctest-test-tempo-delimited-blocks"
|
||||
"adoctest-test-tempo-macros"
|
||||
"adoctest-test-tempo-paragraphs"
|
||||
"adoctest-test-tempo-passthroug-macros"
|
||||
"adoctest-test-tempo-quotes")))
|
||||
#t)))
|
||||
#:tests? #t
|
||||
#:test-command '("emacs" "-Q" "-batch"
|
||||
"-l" "adoc-mode-test.el"
|
||||
"-f" "ert-run-tests-batch-and-exit")))
|
||||
(propagated-inputs
|
||||
`(("emacs-markup-faces" ,emacs-markup-faces)))
|
||||
(home-page "https://github.com/sensorflo/adoc-mode/wiki")
|
||||
|
|
Loading…
Reference in a new issue