02/03: gnu: Add ifuse.

[guix-commits]

dannym pushed a commit to branch master
in repository guix.

commit bc4e8d3e64b1e654d3f77d0aaabf962656aab3fa
Author: Danny Milosavljevic <address@hidden>
Date:   Tue Feb 5 22:33:21 2019 +0100

    gnu: Add ifuse.
    
    * gnu/packages/libusb.scm (ifuse): New variable.
---
 gnu/packages/libusb.scm | 25 ++++++++++++++++++++++++-
 1 file changed, 24 insertions(+), 1 deletion(-)

diff --git a/gnu/packages/libusb.scm b/gnu/packages/libusb.scm
index ce4c285..ff3e14d 100644
--- a/gnu/packages/libusb.scm
+++ b/gnu/packages/libusb.scm
@@ -368,7 +368,7 @@ connections from and to iOS devices by connecting to a 
socket provided by a
                             "m"))))
     (propagated-inputs
      `(("openssl" ,openssl)
-       ("libplist" ,libplist) ; libimobiledevice's ".pc" file requires it.
+       ("libplist" ,libplist)
        ("libusbmuxd" ,libusbmuxd)))
     (inputs
      `(("python" ,python)))
@@ -386,6 +386,29 @@ addressbook/calendars/notes and bookmarks and (using 
libgpod) synchronize
 music and video to the device.")
     (license license:lgpl2.1+)))
 
+(define-public ifuse
+  (package
+    (name "ifuse")
+    (version "1.1.3")
+    (source (origin
+              (method url-fetch)
+              (uri (string-append "http://www.libimobiledevice.org/downloads/";
+                                  "ifuse-" version ".tar.bz2"))
+              (sha256
+               (base32
+                "1p9a4n36jb194cnp6v57cz2bggwbywaz8pbpb95ch83pzdkdx257"))))
+    (inputs
+     `(("fuse" ,fuse)
+       ("libimobiledevice" ,libimobiledevice)))
+    (native-inputs
+     `(("pkg-config" ,pkg-config)))
+    (build-system gnu-build-system)
+    (home-page "http://www.libimobiledevice.org/";)
+    (synopsis "Mount iOS devices")
+    (description "This package provides @command{ifuse}, a command to mount
+iOS devices and access their contents.")
+    (license license:lgpl2.1+)))
+
 (define-public libmtp
   (package
     (name "libmtp")