TakeV/guix
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity

gnu: osinfo-db: Use G-expressions.

Browse source 
* gnu/packages/virtualization.scm (osinfo-db)[arguments]:
Rewrite as G-expressions.
This commit is contained in:
Tobias Geerinckx-Rice 2023-07-16 02:00:02 +02:00
parent ec2016e8b8
commit fa005d8a5b
No known key found for this signature in database
GPG key ID: 0DB0FF884F556D79
1 changed files with 10 additions and 10 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

20
gnu/packages/virtualization.scm
View file

@ -2475,18 +2475,18 @@ (define-public osinfo-db
(base32 "0nl4wh8i9skcg1wx84p31x7rl1xv1267g5ycbn9kfwfnqxzwkl8k"))))
(build-system trivial-build-system)
(arguments
`(#:modules ((guix build utils))
#:builder
(begin
(use-modules (guix build utils))
(let* ((out (assoc-ref %outputs "out"))
(osinfo-dir (string-append out "/share/osinfo"))
(list
#:modules '((guix build utils))
#:builder
#~(begin
(use-modules (guix build utils))
(let ((osinfo (string-append #$output "/share/osinfo"))
(source (assoc-ref %build-inputs "source"))
(osinfo-db-import
(string-append (assoc-ref %build-inputs "osinfo-db-tools")
(import-osinfo-db
(string-append #$(this-package-native-input "osinfo-db-tools")
"/bin/osinfo-db-import")))
(mkdir-p osinfo-dir)
(invoke osinfo-db-import "--dir" osinfo-dir source)))))
(mkdir-p osinfo)
(invoke import-osinfo-db "--dir" osinfo source)))))
(native-inputs
(list intltool osinfo-db-tools))
(home-page "https://gitlab.com/libosinfo/osinfo-db")