mirror of
https://git.savannah.gnu.org/git/guix.git
synced 2026-04-09 14:40:36 +02:00
gnu: snapper: Fix dbus service paths
* gnu/packages/file-systems.scm (snapper): [#:phases]<relative-file-locations>: Add more PATH substitutions in files. Change-Id: I3e91d18b44f33bf389b46b5c02ba124e1929bfd6 Signed-off-by: Ian Eure <ian@retrospec.tv>
This commit is contained in:
@@ -15,6 +15,7 @@
|
||||
;;; Copyright © 2024 Ahmad Draidi <a.r.draidi@redscript.org>
|
||||
;;; Copyright © 2024 Zheng Junjie <873216071@qq.com>
|
||||
;;; Copyright © 2025 Julian Flake <flake@uni-koblenz.de>
|
||||
;;; Copyright © 2025 Ashish SHUKLA <ashish.is@lostca.se>
|
||||
;;
|
||||
;;; This file is part of GNU Guix.
|
||||
;;;
|
||||
@@ -1391,10 +1392,22 @@ APFS.")
|
||||
(("/usr/lib")
|
||||
(string-append out "/lib"))
|
||||
(("/etc/")
|
||||
(string-append out "/etc/"))))
|
||||
(substitute* "client/Makefile.am"
|
||||
(("/usr/lib")
|
||||
"@libdir@")))))))
|
||||
(string-append out "/etc/")))
|
||||
(substitute* (cons "data/org.opensuse.Snapper.service"
|
||||
(find-files "scripts/" "\\.sh"))
|
||||
(("/usr/bin/snapper")
|
||||
(string-append out "/bin/snapper"))
|
||||
(("/usr/sbin/snapperd")
|
||||
(string-append out "/sbin/snapperd"))
|
||||
(("/sbin/btrfs")
|
||||
(which "btrfs")))
|
||||
(substitute* "scripts/snapper-hourly"
|
||||
(("PATH=.*$")
|
||||
(format #f "PATH=~a/sbin:~a/bin\n"
|
||||
out out)))
|
||||
(substitute* (find-files "." "Makefile.am")
|
||||
(("/usr/lib")
|
||||
"@libdir@"))))))))
|
||||
(home-page "https://snapper.io")
|
||||
(native-inputs
|
||||
(list glibc-locales autoconf automake libtool pkg-config))
|
||||
|
||||
Reference in New Issue
Block a user