me
/
guix
Archived
1
0
Fork 0
Code

gnu: httpfs2: Use G-expressions. 

* gnu/packages/file-systems.scm (httpfs2)[arguments]:
Rewrite as G-expressions.
master
Tobias Geerinckx-Rice 2022-01-08 05:42:53 +01:00
parent ef58bc1524
commit f7f88a85d7
No known key found for this signature in database
GPG Key ID: 0DB0FF884F556D79
1 changed files with 23 additions and 24 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

17
gnu/packages/file-systems.scm
View File

@ -586,15 +586,14 @@ Extensible File Allocation Table} file systems. Included are
(inputs (inputs
(list fuse gnutls)) (list fuse gnutls))
(arguments (arguments
`(#:phases (list #:phases
(modify-phases %standard-phases #~(modify-phases %standard-phases
(delete 'configure) ; no configure script (delete 'configure) ; no configure script
(replace 'install (replace 'install
;; There's no ‘install’ target. Install all variants manually. ;; There's no ‘install’ target. Install all variants manually.
(lambda* (#:key outputs #:allow-other-keys) (lambda _
(let* ((out (assoc-ref outputs "out")) (let* ((bin (string-append #$output "/bin"))
(bin (string-append out "/bin")) (man1 (string-append #$output "/share/man/man1")))
(man1 (string-append out "/share/man/man1")))
(mkdir-p bin) (mkdir-p bin)
(mkdir-p man1) (mkdir-p man1)
(for-each (for-each
@ -605,9 +604,9 @@ Extensible File Allocation Table} file systems. Included are
(list "httpfs2" (list "httpfs2"
"httpfs2-mt" "httpfs2-mt"
"httpfs2-ssl" "httpfs2-ssl"
"httpfs2-ssl-mt"))) "httpfs2-ssl-mt"))))))
#t))) #:make-flags
#:make-flags (list "CC=gcc") #~(list "CC=gcc")
#:parallel-build? #f ; can result in missing man pages #:parallel-build? #f ; can result in missing man pages
#:tests? #f)) ; no tests #:tests? #f)) ; no tests
(home-page "https://sourceforge.net/projects/httpfs/") (home-page "https://sourceforge.net/projects/httpfs/")