nixo
/
guix-devel
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

gnu: Add curlftpfs. 

* gnu/packages/file-systems.scm (curlftpfs): New variable.
This commit is contained in:
Danny Milosavljevic 2018-01-16 17:34:22 +01:00
parent 531003be6b
commit 3b1ada0d71
No known key found for this signature in database
GPG Key ID: E71A35542C30BAA5
1 changed files with 37 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

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

@ -32,11 +32,13 @@
#:use-module (gnu packages bison) #:use-module (gnu packages bison)
#:use-module (gnu packages check) #:use-module (gnu packages check)
#:use-module (gnu packages compression) #:use-module (gnu packages compression)
#:use-module (gnu packages curl)
#:use-module (gnu packages databases) #:use-module (gnu packages databases)
#:use-module (gnu packages datastructures) #:use-module (gnu packages datastructures)
#:use-module (gnu packages documentation) #:use-module (gnu packages documentation)
#:use-module (gnu packages docbook) #:use-module (gnu packages docbook)
#:use-module (gnu packages flex) #:use-module (gnu packages flex)
#:use-module (gnu packages glib)
#:use-module (gnu packages linux) #:use-module (gnu packages linux)
#:use-module (gnu packages pkg-config) #:use-module (gnu packages pkg-config)
#:use-module (gnu packages python) #:use-module (gnu packages python)
@ -206,3 +208,38 @@ consumption needs. It incorporates automatic failover as a primary feature.
All of this is accomplished without a centralized metadata server.") All of this is accomplished without a centralized metadata server.")
;; The user may choose either LGPLv3+ or GPLv2 only. ;; The user may choose either LGPLv3+ or GPLv2 only.
(license (list license:lgpl3+ license:gpl2+)))) (license (list license:lgpl3+ license:gpl2+))))
(define-public curlftpfs
(package
(name "curlftpfs")
(version "0.9.2")
(source
(origin
(method url-fetch)
(uri (string-append "mirror://sourceforge/curlftpfs/curlftpfs/" version
"/curlftpfs-" version ".tar.gz"))
(sha256
(base32
"0n397hmv21jsr1j7zx3m21i7ryscdhkdsyqpvvns12q7qwwlgd2f"))))
(build-system gnu-build-system)
(arguments
`(#:phases
(modify-phases %standard-phases
(add-after 'unpack 'fix-test
(lambda _
;; One of the 512-Byte block counts is definitely wrong.
;; See <https://sourceforge.net/p/curlftpfs/bugs/73/>.
(substitute* "tests/ftpfs-ls_unittest.c"
(("4426192") "12814800"))
#t)))))
(inputs
`(("curl" ,curl)
("glib" ,glib)
("fuse", fuse)))
(native-inputs
`(("pkg-config" ,pkg-config)))
(home-page "http://curlftpfs.sourceforge.net/")
(synopsis "Mount remote file systems over FTP")
(description
"This is a file system client based on the FTP File Transfer Protocol.")
(license license:gpl2+)))