me/guix
Archived
1
0
Fork 0
Code Activity

gnu: fakeroot: Update to 1.25.3-1.24d6b08.

Browse source 
* gnu/packages/linux.scm (fakeroot): Update to 1.25.3-1.24d6b08.
This commit is contained in:
Efraim Flashner 2021-08-25 11:45:24 +03:00
parent 89d862493f
commit d9e7d9c408
No known key found for this signature in database
GPG key ID: 41AAE7DCCA3D8351
1 changed files with 77 additions and 77 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

154
gnu/packages/linux.scm
View file

@ -7676,90 +7676,90 @@ the superuser to make device nodes.")
(license license:gpl2))) (license license:gpl2)))
(define-public fakeroot (define-public fakeroot
(package ;; glibc-2.33 compatibility was added since the last release.
(name "fakeroot") (let ((commit "24d6b0857396cad87b2cabd32fb8af9ef4799915")
(version "1.25.3") (revision "1"))
(source (origin (package
;; There are no tags in the repository, so take this snapshot. (name "fakeroot")
(method url-fetch) (version (git-version "1.25.3" revision commit))
(uri (string-append "https://deb.debian.org/debian/pool/main/f/" (source (origin
"fakeroot/fakeroot_" version ".orig.tar.gz")) (method git-fetch)
(file-name (string-append name "-" version ".tar.gz")) (uri (git-reference
(sha256 (url "https://salsa.debian.org/clint/fakeroot.git")
(base32 (commit commit)))
"0v4m3v1bdqvblwj3vqsb3mllgbci6dsgsydq6765nzvz6n1kd44f")))) (file-name (git-file-name name version))
(build-system gnu-build-system) (sha256
(arguments (base32
`(#:phases "0rg9m30k6v930cmj16qwk1k2vn1l2irxj7r3pp3k1i1sdhfkm3df"))))
(modify-phases %standard-phases (build-system gnu-build-system)
(replace 'bootstrap (arguments
(lambda _ `(#:phases
;; The "preroll" script takes care of Autoconf and also (modify-phases %standard-phases
;; prepares the translated manuals. (replace 'bootstrap
(invoke "sh" "./preroll"))) (lambda _
(add-after 'configure 'patch-Makefile ;; The "preroll" script takes care of Autoconf and also
(lambda _ ;; prepares the translated manuals.
;; Note: The root of the problem is already in "Makefile.am". (invoke "sh" "./preroll")))
(substitute* "Makefile" (add-after 'configure 'patch-Makefile
(("/bin/sh") (which "sh"))) (lambda _
#t)) ;; Note: The root of the problem is already in "Makefile.am".
(add-after 'unpack 'patch-script (substitute* "Makefile"
(lambda* (#:key inputs #:allow-other-keys) (("/bin/sh") (which "sh")))))
(substitute* "scripts/fakeroot.in" (add-after 'unpack 'patch-script
(("getopt") (lambda* (#:key inputs #:allow-other-keys)
(search-input-file inputs "/bin/getopt")) (substitute* "scripts/fakeroot.in"
(("sed") (("getopt")
(search-input-file inputs "/bin/sed")) (search-input-file inputs "/bin/getopt"))
(("cut") (("sed")
(search-input-file inputs "/bin/cut")) ))) (search-input-file inputs "/bin/sed"))
(add-before 'configure 'setenv (("cut")
(lambda _ (search-input-file inputs "/bin/cut")) )))
(setenv "LIBS" "-lacl") (add-before 'configure 'setenv
#t)) (lambda _
(add-before 'check 'prepare-check (setenv "LIBS" "-lacl")))
(lambda _ (add-before 'check 'prepare-check
(setenv "SHELL" (which "bash")) (lambda _
(setenv "VERBOSE" "1") (setenv "SHELL" (which "bash"))
(substitute* "test/t.touchinstall" (setenv "VERBOSE" "1")
;; We don't have the name of the root user, so use ID=0. (substitute* "test/t.touchinstall"
(("grep root") "grep \"\\<0\\>\"")) ;; We don't have the name of the root user, so use ID=0.
(substitute* "test/tartest" (("grep root") "grep \"\\<0\\>\""))
;; We don't have the name of the root group, so use ID=0. (substitute* "test/tartest"
(("ROOTGROUP=root") "ROOTGROUP=0") ;; We don't have the name of the root group, so use ID=0.
;; We don't have the name of the daemon user, so use IDs. (("ROOTGROUP=root") "ROOTGROUP=0")
(("daemon:sys") "1:3") ;; We don't have the name of the daemon user, so use IDs.
(("daemon:") "1:")) (("daemon:sys") "1:3")
;; We don't have an /etc/passwd entry for "root" - use numeric IDs. (("daemon:") "1:"))
(substitute* "test/compare-tar" ;; We don't have an /etc/passwd entry for "root" - use numeric IDs.
(("tar -tvf") "tar --numeric-owner -tvf")) (substitute* "test/compare-tar"
#t))))) (("tar -tvf") "tar --numeric-owner -tvf")))))))
(native-inputs (native-inputs
`(;; For bootstrapping the package. `(;; For bootstrapping the package.
("autoconf" ,autoconf) ("autoconf" ,autoconf)
("automake" ,automake) ("automake" ,automake)
("libtool" ,libtool) ("libtool" ,libtool)
("gettext" ,gettext-minimal) ("gettext" ,gettext-minimal)
("po4a" ,po4a) ("po4a" ,po4a)
;; For tests. ;; For tests.
("sharutils" ,sharutils) ("sharutils" ,sharutils)
("xz" ,xz))) ("xz" ,xz)))
(inputs (inputs
`(("acl" ,acl) `(("acl" ,acl)
("libcap" ,libcap) ("libcap" ,libcap)
("util-linux" ,util-linux) ("util-linux" ,util-linux)
("sed" ,sed) ("sed" ,sed)
("coreutils" ,coreutils))) ("coreutils" ,coreutils)))
(synopsis "Provides a fake root environment") (synopsis "Provides a fake root environment")
(description "@command{fakeroot} runs a command in an environment where (description "@command{fakeroot} runs a command in an environment where
it appears to have root privileges for file manipulation. This is useful it appears to have root privileges for file manipulation. This is useful
for allowing users to create archives (tar, ar, .deb etc.) with files in for allowing users to create archives (tar, ar, .deb etc.) with files in
them with root permissions/ownership. Without fakeroot one would have to them with root permissions/ownership. Without fakeroot one would have to
have root privileges to create the constituent files of the archives with have root privileges to create the constituent files of the archives with
the correct permissions and ownership, and then pack them up, or one would the correct permissions and ownership, and then pack them up, or one would
have to construct the archives directly, without using the archiver.") have to construct the archives directly, without using the archiver.")
(home-page "http://freshmeat.sourceforge.net/projects/fakeroot") (home-page "http://freshmeat.sourceforge.net/projects/fakeroot")
(license license:gpl3+))) (license license:gpl3+))))
(define-public fakechroot (define-public fakechroot
(package (package