me
/
guix
Archived
1
0
Fork 0
Code

gnu: crda: Use G-expressions. 

* gnu/packages/linux.scm (crda)[arguments]:
Rewrite as G-expressions.
master
Tobias Geerinckx-Rice 2023-07-02 02:00:01 +02:00
parent 7629377556
commit 59da3b6892
No known key found for this signature in database
GPG Key ID: 0DB0FF884F556D79
1 changed files with 51 additions and 51 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

42
gnu/packages/linux.scm
View File

@ -4569,21 +4569,21 @@ interface.")
(patches (search-patches "crda-optional-gcrypt.patch")))) (patches (search-patches "crda-optional-gcrypt.patch"))))
(build-system gnu-build-system) (build-system gnu-build-system)
(arguments (arguments
`(#:phases (modify-phases %standard-phases (list #:phases
#~(modify-phases %standard-phases
(delete 'configure) (delete 'configure)
(add-after 'unpack 'gzip-determinism (add-after 'unpack 'gzip-deterministically
(lambda _ (lambda _
(substitute* "Makefile" (substitute* "Makefile"
(("gzip") "gzip --no-name")))) (("gzip" command)
,@(if (%current-target-system) (string-append command " --no-name")))))
'((add-after #$@(if (%current-target-system)
'unpack 'fix-pkg-config #~((add-after 'unpack 'fix-pkg-config
(lambda* (#:key target #:allow-other-keys) (lambda* (#:key target #:allow-other-keys)
(substitute* (substitute* "Makefile"
"Makefile" (("pkg-config" command)
(("pkg-config") (string-append target "-" command))))))
(string-append target "-pkg-config")))))) #~())
'())
(add-before 'build 'patch-Makefile (add-before 'build 'patch-Makefile
(lambda _ (lambda _
(substitute* "Makefile" (substitute* "Makefile"
@ -4598,10 +4598,9 @@ interface.")
(string-append "\"" regdb (string-append "\"" regdb
"/lib/crda/regulatory.bin\""))))))) "/lib/crda/regulatory.bin\"")))))))
#:test-target "verify" #:test-target "verify"
#:make-flags (let ((out (assoc-ref %outputs "out")) #:make-flags
(regdb (assoc-ref %build-inputs "wireless-regdb"))) #~(list
(list (string-append "CC=" #$(cc-for-target))
(string-append "CC=" ,(cc-for-target))
"V=1" "V=1"
;; Disable signature-checking on 'regulatory.bin'. ;; Disable signature-checking on 'regulatory.bin'.
@ -4614,15 +4613,16 @@ interface.")
;; for a discssion. ;; for a discssion.
"USE_OPENSSL=0" "USE_OPENSSL=0"
(string-append "PREFIX=" out) (string-append "PREFIX=" #$output)
(string-append "SBINDIR=" out "/sbin/") (string-append "SBINDIR=" #$output "/sbin/")
(string-append "UDEV_RULE_DIR=" (string-append "UDEV_RULE_DIR="
out "/lib/udev/rules.d") #$output "/lib/udev/rules.d")
(string-append "LDFLAGS=-Wl,-rpath=" (string-append "LDFLAGS=-Wl,-rpath="
out "/lib -L.") #$output "/lib -L.")
(string-append "REG_BIN=" regdb (string-append "REG_BIN="
#$(this-package-native-input "wireless-regdb")
"/lib/crda/regulatory.bin") "/lib/crda/regulatory.bin")
"all_noverify")))) "all_noverify")))
(native-inputs (list pkg-config wireless-regdb)) (native-inputs (list pkg-config wireless-regdb))
(inputs (list libnl)) (inputs (list libnl))
(home-page (home-page