mirror/guix
1
0
Fork 0
mirror of https://git.savannah.gnu.org/git/guix.git synced 2025-02-01 15:26:47 +01:00
Code Issues Projects Releases Packages Wiki Activity Actions

gnu: acl: Remove labels and trailing #t.

Browse source 
* gnu/packages/acl.scm (acl): Remove labels and trailing #t.

Change-Id: I01b3d697da78ae1294b76d1073dbfd0ffe37fe31
This commit is contained in:
Maxim Cournoyer 2023-10-09 11:18:02 -04:00 committed by Ludovic Courtès
parent f59df1aa3c
commit 5d1a128f64
No known key found for this signature in database
GPG key ID: 090B11993D9AEBB5
1 changed files with 4 additions and 9 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

13
gnu/packages/acl.scm
View file

@ -66,13 +66,11 @@ (define-public acl
(ftw "." (lambda (file stat flag)
(unless (<= early-1980 (stat:mtime stat))
(utime file early-1980 early-1980))
#t))
#t)))
#t)))))
(add-after 'build 'patch-exec-bin-sh
(lambda _
(substitute* "test/run"
(("/bin/sh") (which "sh")))
#t))
(("/bin/sh") (which "sh")))))
(add-before 'check 'patch-tests
(lambda _
;; The coreutils do not have an ACL bit to remove from their
@ -84,12 +82,9 @@ (define-public acl
(substitute* "Makefile.in"
((".*test/misc\\.test.*") "")
((".*test/cp\\.test.*") "")
((".*test/setfacl-X\\.test.*") ""))
#t)))))
((".*test/setfacl-X\\.test.*") "")))))))
(inputs (list attr))
(native-inputs
`(("gettext" ,gettext-minimal)
("perl" ,perl)))
(native-inputs (list gettext-minimal perl))
(home-page "https://savannah.nongnu.org/projects/acl")
(synopsis
"Library and tools for manipulating access control lists")