gnu: emacs-org-pomodoro: Improve package style.
* gnu/packages/emacs-xyz.scm (emacs-org-pomodoro)[arguments]: Use G-expressions. Remove trailing #T.
This commit is contained in:
parent
5f8e89b702
commit
256cdde7ad
1 changed files with 22 additions and 22 deletions
|
@ -8008,28 +8008,28 @@ save, it exports back to the original non-Org file.")
|
||||||
(propagated-inputs
|
(propagated-inputs
|
||||||
(list emacs-alert))
|
(list emacs-alert))
|
||||||
(arguments
|
(arguments
|
||||||
`(#:include (cons "^resources\\/" %default-include)
|
(list
|
||||||
|
#:include #~(cons "^resources\\/" %default-include)
|
||||||
#:tests? #t
|
#:tests? #t
|
||||||
#:test-command '("emacs" "--batch"
|
#:test-command
|
||||||
|
(list
|
||||||
|
"emacs" "--batch"
|
||||||
"-l" "org-pomodoro-tests.el"
|
"-l" "org-pomodoro-tests.el"
|
||||||
"-f" "ert-run-tests-batch-and-exit")
|
"-f" "ert-run-tests-batch-and-exit")
|
||||||
#:phases
|
#:phases
|
||||||
(modify-phases %standard-phases
|
#~(modify-phases %standard-phases
|
||||||
(add-before 'check 'make-tests-writable
|
(add-before 'check 'make-tests-writable
|
||||||
(lambda _
|
(lambda _
|
||||||
(make-file-writable "org-pomodoro-tests.el")
|
(make-file-writable "org-pomodoro-tests.el")))
|
||||||
#t))
|
|
||||||
(add-before 'check 'add-require
|
(add-before 'check 'add-require
|
||||||
(lambda _
|
(lambda _
|
||||||
(emacs-batch-edit-file "org-pomodoro-tests.el"
|
(emacs-batch-edit-file "org-pomodoro-tests.el"
|
||||||
`(progn (progn (goto-char (point-min))
|
`(progn (progn (goto-char (point-min))
|
||||||
(re-search-forward
|
(re-search-forward "ert-deftest")
|
||||||
"ert-deftest")
|
|
||||||
(beginning-of-line)
|
(beginning-of-line)
|
||||||
(forward-line -1)
|
(forward-line -1)
|
||||||
(insert "(require 'org-pomodoro)"))
|
(insert "(require 'org-pomodoro)"))
|
||||||
(basic-save-buffer)))
|
(basic-save-buffer))))))))
|
||||||
#t)))))
|
|
||||||
(home-page "https://github.com/marcinkoziej/org-pomodoro")
|
(home-page "https://github.com/marcinkoziej/org-pomodoro")
|
||||||
(synopsis "Pomodoro technique for org-mode")
|
(synopsis "Pomodoro technique for org-mode")
|
||||||
(description "@code{emacs-org-pomodoro} adds very basic support for
|
(description "@code{emacs-org-pomodoro} adds very basic support for
|
||||||
|
|
Reference in a new issue