me/guix
Archived
1
0
Fork 0
Code Activity

gnu: dovecot: Indent arguments.

Browse source 
* gnu/packages/mail.scm (dovecot)[arguments]: C-M-q and tuck left.
This commit is contained in:
Tobias Geerinckx-Rice 2019-03-08 01:11:45 +01:00
parent 7969751f54
commit f762e49f28
No known key found for this signature in database
GPG key ID: 0DB0FF884F556D79
1 changed files with 23 additions and 26 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

15
gnu/packages/mail.scm
View file

@ -1303,9 +1303,9 @@ facilities for checking incoming mail.")
(arguments (arguments
`(#:configure-flags '("--sysconfdir=/etc" `(#:configure-flags '("--sysconfdir=/etc"
"--localstatedir=/var") "--localstatedir=/var")
#:phases (modify-phases %standard-phases #:phases
(add-before (modify-phases %standard-phases
'configure 'pre-configure (add-before 'configure 'pre-configure
(lambda _ (lambda _
;; Simple hack to avoid installing in /etc. ;; Simple hack to avoid installing in /etc.
(substitute* '("doc/Makefile.in" (substitute* '("doc/Makefile.in"
@ -1313,19 +1313,16 @@ facilities for checking incoming mail.")
(("pkgsysconfdir = .*") (("pkgsysconfdir = .*")
"pkgsysconfdir = /tmp/etc")) "pkgsysconfdir = /tmp/etc"))
#t)) #t))
(add-after (add-after 'unpack 'patch-file-names
'unpack 'patch-file-names
(lambda _ (lambda _
(substitute* (substitute* "src/lib-program-client/test-program-client-local.c"
"src/lib-program-client/test-program-client-local.c"
(("(/bin/| )cat") (which "cat")) (("(/bin/| )cat") (which "cat"))
(("/bin/echo") (which "echo")) (("/bin/echo") (which "echo"))
(("/bin/false") (which "false")) (("/bin/false") (which "false"))
(("/bin/sh") (which "bash")) (("/bin/sh") (which "bash"))
(("head") (which "head")) (("head") (which "head"))
(("sleep") (which "sleep"))) (("sleep") (which "sleep")))
(substitute* (substitute* (list "src/lib-smtp/test-bin/sendmail-exit-1.sh"
(list "src/lib-smtp/test-bin/sendmail-exit-1.sh"
"src/lib-smtp/test-bin/sendmail-success.sh") "src/lib-smtp/test-bin/sendmail-success.sh")
(("cat") (which "cat"))) (("cat") (which "cat")))
#t))))) #t)))))