amaharaneko/guix-mirrors
1
1
Fork 0
mirror of https://codeberg.org/guix/guix.git synced 2025-10-02 02:15:12 +00:00
Code Issues Projects Releases Packages Wiki Activity Actions

gnu: mcron: Re-indent (arguments).

Browse source 
The more common formatting style for arguments seems to be to align the value
under the keyword.  This commit adjusts the definition to match that style.

* gnu/packages/guile-xyz.scm (mcron)[arguments]: Re-indent.

Change-Id: I5d3be19e41828db43af70207cb28b14c35d13419
Signed-off-by: Ludovic Courtès <ludo@gnu.org>
This commit is contained in:
Tomas Volf 2025-01-25 00:46:38 +01:00 • committed by Ludovic Courtès
parent f8743d4b24
commit b4b14a49cd
No known key found for this signature in database
GPG key ID: 090B11993D9AEBB5
1 changed files with 16 additions and 15 deletions
Download patch file Download diff file Expand all files Collapse all files

31
gnu/packages/guile-xyz.scm
View file

@ -3294,21 +3294,22 @@ is no support for parsing block and inline level HTML.")
#:configure-flags
#~(list
"--with-sendmail=/run/privileged/bin/sendmail -t")
#:phases #~(modify-phases %standard-phases
(add-before 'check 'adjust-tests
(lambda _
(substitute* "tests/job-specifier.scm"
;; (getpw) fails with "entry not found" in the build
;; environment, so pass an argument.
(("\\(getpw\\)")
"(getpwnam (getuid))")
;; The build environment lacks an entry for root in
;; /etc/passwd.
(("\\(getpw 0\\)")
"(getpwnam \"nobody\")")
;; FIXME: Skip the 4 faulty tests (see above).
(("\\(test-equal \"next-year\"" all)
(string-append "(test-skip 4)\n" all))))))))
#:phases
#~(modify-phases %standard-phases
(add-before 'check 'adjust-tests
(lambda _
(substitute* "tests/job-specifier.scm"
;; (getpw) fails with "entry not found" in the build
;; environment, so pass an argument.
(("\\(getpw\\)")
"(getpwnam (getuid))")
;; The build environment lacks an entry for root in
;; /etc/passwd.
(("\\(getpw 0\\)")
"(getpwnam \"nobody\")")
;; FIXME: Skip the 4 faulty tests (see above).
(("\\(test-equal \"next-year\"" all)
(string-append "(test-skip 4)\n" all))))))))
(native-inputs (list autoconf
automake
guile-3.0 ;for 'guild compile'