me
/
guix
Archived
1
0
Fork 0
Code

gnu: mcron: Update to 1.2.3. 

* gnu/packages/guile-xyz.scm (mcron): Update to 1.2.3.

Signed-off-by: Maxim Cournoyer <maxim.cournoyer@gmail.com>
Modified-by: Maxim Cournoyer <maxim.cournoyer@gmail.com>
master
Adam Faiz 2023-04-25 19:51:04 +08:00 committed by Maxim Cournoyer
parent c1138889d9
commit 8226549181
No known key found for this signature in database
GPG Key ID: 1260E46482E63562
1 changed files with 43 additions and 47 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

90
gnu/packages/guile-xyz.scm
View File

@ -2974,56 +2974,52 @@ is no support for parsing block and inline level HTML.")
(inputs (list guile-2.0)))) (inputs (list guile-2.0))))
(define-public mcron (define-public mcron
;; Use the latest commits, as interesting changes haven't been released yet, (package
;; such as improved logging. (name "mcron")
(let ((revision "0") (version "1.2.3")
(commit "5fd0ccde5a4cff70299999f988e6b5166584814d")) (source (origin
(package (method git-fetch)
(name "mcron") (uri (git-reference
(version (git-version "1.2.1" revision commit)) (url "https://git.savannah.gnu.org/git/mcron.git")
(source (origin (commit (string-append "v" version))))
(method git-fetch) (file-name (git-file-name name version))
(uri (git-reference (sha256
(url "https://git.savannah.gnu.org/git/mcron.git") (base32
(commit commit))) "07gqwbjfsgf16ff624hkav0qhl10dv579y10fxas2kbjavqm4yx5"))))
(file-name (git-file-name name version)) (build-system gnu-build-system)
(sha256 (arguments
(base32 (list
"0jl2w67a5hkphzssdzq3q4jcwv2b174b11d3w5i3khxq2vhzd6kk")))) #:phases #~(modify-phases %standard-phases
(build-system gnu-build-system) (add-before 'check 'adjust-tests
(arguments (lambda _
(list (substitute* "tests/job-specifier.scm"
#:phases #~(modify-phases %standard-phases ;; (getpw) fails with "entry not found" in the build
(add-before 'check 'adjust-tests ;; environment, so pass an argument.
(lambda _ (("\\(getpw\\)")
(substitute* "tests/job-specifier.scm" "(getpwnam (getuid))")
;; (getpw) fails with "entry not found" in the build ;; The build environment lacks an entry for root in
;; environment, so pass an argument. ;; /etc/passwd.
(("\\(getpw\\)") (("\\(getpw 0\\)")
"(getpwnam (getuid))") "(getpwnam \"nobody\")")
;; The build environment lacks an entry for root in ;; FIXME: Skip the 4 faulty tests (see above).
;; /etc/passwd. (("\\(test-equal \"next-year\"" all)
(("\\(getpw 0\\)") (string-append "(test-skip 4)\n" all))))))))
"(getpwnam \"nobody\")") (native-inputs (list autoconf
;; FIXME: Skip the 4 faulty tests (see above). automake
(("\\(test-equal \"next-year\"" all) guile-3.0 ;for 'guild compile'
(string-append "(test-skip 4)\n" all)))))))) help2man
(native-inputs (list autoconf pkg-config
automake tzdata-for-tests
guile-3.0 ;for 'guild compile' texinfo))
help2man (inputs (list guile-3.0))
pkg-config (home-page "https://www.gnu.org/software/mcron/")
tzdata-for-tests (synopsis "Run jobs at scheduled times")
texinfo)) (description
(inputs (list guile-3.0)) "GNU Mcron is a complete replacement for Vixie cron. It is used to run
(home-page "https://www.gnu.org/software/mcron/")
(synopsis "Run jobs at scheduled times")
(description
"GNU Mcron is a complete replacement for Vixie cron. It is used to run
tasks on a schedule, such as every hour or every Monday. Mcron is written in tasks on a schedule, such as every hour or every Monday. Mcron is written in
Guile, so its configuration can be written in Scheme; the original cron Guile, so its configuration can be written in Scheme; the original cron
format is also supported.") format is also supported.")
(license license:gpl3+)))) (license license:gpl3+)))
(define-public guile-picture-language (define-public guile-picture-language
(let ((commit "a1322bf11945465241ca5b742a70893f24156d12") (let ((commit "a1322bf11945465241ca5b742a70893f24156d12")