me
/
guix
Archived
1
0
Fork 0

gnu: emacs-ert-runner: Update to 0.8.0.

* (emacs-ert-runner): Update to 0.8.0.
master
Maxim Cournoyer 2020-03-22 23:54:54 -04:00
parent 80168c4b5b
commit 09c09c4c7c
No known key found for this signature in database
GPG Key ID: 1260E46482E63562
1 changed files with 46 additions and 49 deletions

View File

@ -9969,57 +9969,54 @@ Emacs.")
;; Tests for ert-runner have a circular dependency with ecukes, and therefore ;; Tests for ert-runner have a circular dependency with ecukes, and therefore
;; cannot be run ;; cannot be run
(define-public emacs-ert-runner (define-public emacs-ert-runner
(let ((version "0.7.0") (package
(revision "1") (name "emacs-ert-runner")
(commit "90b8fdd5970ef76a4649be60003b37f82cdc1a65")) (version "0.8.0")
(package (source
(name "emacs-ert-runner") (origin
(version (git-version "0.7.0" revision commit)) (method git-fetch)
(source (uri (git-reference
(origin (url "https://github.com/rejeep/ert-runner.el.git")
(method git-fetch) (commit (string-append "v" version))))
(uri (git-reference (file-name (git-file-name name version))
(url "https://github.com/rejeep/ert-runner.el.git") (sha256
(commit commit))) (base32
(file-name (git-file-name name version)) "08gygn9fjank5gpi4v6ynrkn0jbknxbwsn7md4p9ndygdbmnkf98"))))
(sha256 (build-system emacs-build-system)
(base32 (inputs
"04nxmyzncacj2wmzd84vv9wkkr2dk9lcb10dvygqmg3p1gadnwzz")))) `(("emacs-ansi" ,emacs-ansi)
(build-system emacs-build-system) ("emacs-commander" ,emacs-commander)
(inputs ("emacs-dash" ,emacs-dash)
`(("emacs-ansi" ,emacs-ansi) ("emacs-f" ,emacs-f)
("emacs-commander" ,emacs-commander) ("emacs-s" ,emacs-s)
("emacs-dash" ,emacs-dash) ("emacs-shut-up" ,emacs-shut-up)))
("emacs-f" ,emacs-f) (arguments
("emacs-s" ,emacs-s) `(#:phases
("emacs-shut-up" ,emacs-shut-up))) (modify-phases %standard-phases
(arguments (add-after 'install 'install-executable
`(#:phases (lambda* (#:key inputs outputs #:allow-other-keys)
(modify-phases %standard-phases (let ((out (assoc-ref outputs "out"))
(add-after 'install 'install-executable (source-directory (string-append
(lambda* (#:key inputs outputs #:allow-other-keys) (getenv "TMPDIR") "/source")))
(let ((out (assoc-ref outputs "out")) (substitute* "bin/ert-runner"
(source-directory (string-append (("ERT_RUNNER=\"\\$\\(dirname \\$\\(dirname \\$0\\)\\)")
(getenv "TMPDIR") "/source"))) (string-append "ERT_RUNNER=\"" out
(substitute* "bin/ert-runner" "/share/emacs/site-lisp")))
(("ERT_RUNNER=\"\\$\\(dirname \\$\\(dirname \\$0\\)\\)") (install-file "bin/ert-runner" (string-append out "/bin"))
(string-append "ERT_RUNNER=\"" out (wrap-program (string-append out "/bin/ert-runner")
"/share/emacs/site-lisp"))) (list "EMACSLOADPATH" ":" 'prefix
(install-file "bin/ert-runner" (string-append out "/bin")) ;; Do not capture the transient source directory in
(wrap-program (string-append out "/bin/ert-runner") ;; the wrapper.
(list "EMACSLOADPATH" ":" 'prefix (delete source-directory
;; Do not capture the transient source directory in (string-split (getenv "EMACSLOADPATH") #\:))))
;; the wrapper. #t))))
(delete source-directory #:include (cons* "^reporters/.*\\.el$" %default-include)))
(string-split (getenv "EMACSLOADPATH") #\:)))) (home-page "https://github.com/rejeep/ert-runner.el")
#t)))) (synopsis "Opinionated Ert testing workflow")
#:include (cons* "^reporters/.*\\.el$" %default-include))) (description "@code{ert-runner} is a tool for Emacs projects tested
(home-page "https://github.com/rejeep/ert-runner.el")
(synopsis "Opinionated Ert testing workflow")
(description "@code{ert-runner} is a tool for Emacs projects tested
using ERT. It assumes a certain test structure setup and can therefore make using ERT. It assumes a certain test structure setup and can therefore make
running tests easier.") running tests easier.")
(license license:gpl3+)))) (license license:gpl3+)))
(define-public ert-runner (define-public ert-runner
(deprecated-package "ert-runner" emacs-ert-runner)) (deprecated-package "ert-runner" emacs-ert-runner))