me/guix
Archived
1
0
Fork 0
Code Activity

gnu: util-linux: Adjust indentation.

Browse source 
* gnu/packages/linux.scm (util-linux): Re-indent.
This commit is contained in:
Marius Bakke 2019-10-13 17:23:28 +02:00
parent 0163b9002a
commit a4a70cc4d7
No known key found for this signature in database
GPG key ID: A2A06DF2A33A54FA
1 changed files with 36 additions and 39 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

9
gnu/packages/linux.scm
View file

@ -1102,8 +1102,7 @@ providing the system administrator with some help in common tasks.")
(assoc-ref %outputs "out") (assoc-ref %outputs "out")
"/etc/bash_completion.d")) "/etc/bash_completion.d"))
#:phases (modify-phases %standard-phases #:phases (modify-phases %standard-phases
(add-before (add-before 'build 'set-umount-file-name
'build 'set-umount-file-name
(lambda* (#:key outputs #:allow-other-keys) (lambda* (#:key outputs #:allow-other-keys)
;; Tell 'eject' the right file name of 'umount'. ;; Tell 'eject' the right file name of 'umount'.
(let ((out (assoc-ref outputs "out"))) (let ((out (assoc-ref outputs "out")))
@ -1111,8 +1110,7 @@ providing the system administrator with some help in common tasks.")
(("\"/bin/umount\"") (("\"/bin/umount\"")
(string-append "\"" out "/bin/umount\""))) (string-append "\"" out "/bin/umount\"")))
#t))) #t)))
(add-before (add-before 'check 'pre-check
'check 'pre-check
(lambda* (#:key inputs outputs #:allow-other-keys) (lambda* (#:key inputs outputs #:allow-other-keys)
(let ((out (assoc-ref outputs "out")) (let ((out (assoc-ref outputs "out"))
(net (assoc-ref inputs "net-base"))) (net (assoc-ref inputs "net-base")))
@ -1121,8 +1119,7 @@ providing the system administrator with some help in common tasks.")
(("/etc/services") (("/etc/services")
(string-append net "/etc/services"))) (string-append net "/etc/services")))
#t))) #t)))
(add-after (add-after 'install 'move-static-libraries
'install 'move-static-libraries
(lambda* (#:key outputs #:allow-other-keys) (lambda* (#:key outputs #:allow-other-keys)
(let ((out (assoc-ref outputs "out")) (let ((out (assoc-ref outputs "out"))
(static (assoc-ref outputs "static"))) (static (assoc-ref outputs "static")))