me
/
guix
Archived
1
0
Fork 0
Code

gnu: os-prober: Update to 1.80. 

* gnu/packages/bootloaders.scm (os-prober): Update to 1.80.
[arguments]: Don't explicitly return #t from phases.
master
Tobias Geerinckx-Rice 2022-05-29 02:00:02 +02:00
parent d6d06ee237
commit 3666e5e409
No known key found for this signature in database
GPG Key ID: 0DB0FF884F556D79
1 changed files with 4 additions and 6 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

10
gnu/packages/bootloaders.scm
View File

@ -1131,14 +1131,14 @@ tools, and more.")
(define-public os-prober (define-public os-prober
(package (package
(name "os-prober") (name "os-prober")
(version "1.79") (version "1.80")
(source (source
(origin (origin
(method url-fetch) (method url-fetch)
(uri (string-append "mirror://debian/pool/main/o/os-prober/os-prober_" (uri (string-append "mirror://debian/pool/main/o/os-prober/os-prober_"
version ".tar.xz")) version ".tar.xz"))
(sha256 (sha256
(base32 "1vhhk0bl2j4910513gn5h3z8nsaavyv3c8764bim2klc0xyk3rmb")))) (base32 "13z3rshgz5xj0328a80wavdimjw925yha9s1ks398sq0kn5w6qw0"))))
(build-system gnu-build-system) (build-system gnu-build-system)
(arguments (arguments
`(#:modules ((guix build gnu-build-system) `(#:modules ((guix build gnu-build-system)
@ -1155,8 +1155,7 @@ tools, and more.")
(substitute* (find-files ".") (substitute* (find-files ".")
(("/usr") (assoc-ref outputs "out"))) (("/usr") (assoc-ref outputs "out")))
(substitute* (find-files "." "50mounted-tests$") (substitute* (find-files "." "50mounted-tests$")
(("mkdir") "mkdir -p")) (("mkdir") "mkdir -p"))))
#t))
(replace 'install (replace 'install
(lambda* (#:key outputs #:allow-other-keys) (lambda* (#:key outputs #:allow-other-keys)
(define (find-files-non-recursive directory) (define (find-files-non-recursive directory)
@ -1187,8 +1186,7 @@ tools, and more.")
(append (find-files-non-recursive (string-append directory "/common")) (append (find-files-non-recursive (string-append directory "/common"))
(find-files-non-recursive (string-append directory "/x86"))))) (find-files-non-recursive (string-append directory "/x86")))))
(list "os-probes" "os-probes/mounted" "os-probes/init" (list "os-probes" "os-probes/mounted" "os-probes/init"
"linux-boot-probes" "linux-boot-probes/mounted")) "linux-boot-probes" "linux-boot-probes/mounted"))))))))
#t))))))
(home-page "https://joeyh.name/code/os-prober") (home-page "https://joeyh.name/code/os-prober")
(synopsis "Detect other operating systems") (synopsis "Detect other operating systems")
(description "os-prober probes disks on the system for other operating (description "os-prober probes disks on the system for other operating