diff options
author | Maxim Cournoyer <maxim.cournoyer@gmail.com> | 2019-11-01 21:37:37 -0400 |
---|---|---|
committer | Maxim Cournoyer <maxim.cournoyer@gmail.com> | 2019-11-01 21:59:19 -0400 |
commit | 44d1cce5573eca7d3fa7cca663f289072e65bcc1 (patch) | |
tree | 741591b04b9e245f24bbb9643dd3588ad3df2e99 /gnu/packages/emacs-xyz.scm | |
parent | 23c5c8e4e487490959dcb07480716b0cc2810e2e (diff) | |
download | patches-44d1cce5573eca7d3fa7cca663f289072e65bcc1.tar patches-44d1cce5573eca7d3fa7cca663f289072e65bcc1.tar.gz |
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.
Diffstat (limited to 'gnu/packages/emacs-xyz.scm')
-rw-r--r-- | gnu/packages/emacs-xyz.scm | 36 |
1 files changed, 32 insertions, 4 deletions
diff --git a/gnu/packages/emacs-xyz.scm b/gnu/packages/emacs-xyz.scm index 6f584f72b7..d02c163e9f 100644 --- a/gnu/packages/emacs-xyz.scm +++ b/gnu/packages/emacs-xyz.scm @@ -15869,13 +15869,41 @@ and 'text viewing modes' respectively.") (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") |