;; Use this version of usbmuxd to access an iPhone.
;; Cf. <https://github.com/libusb/libusb/issues/825>.

(use-modules ((gnu packages libusb) #:select (libusb usbmuxd))
             (guix download)
             (guix packages)
             (ice-9 match))

(define libusb-1.0.25
  (package
    (inherit libusb)
    (version "1.0.25")
    (source
     (origin
       (method url-fetch)
       (uri (string-append "https://github.com/libusb/libusb/releases"
                           "/download/v1.0.25/libusb-1.0.25.tar.bz2"))
       (sha256
        (base32 "0j88ym7afy4wj3x789zzxsr04asyjy0mw29gf31blzkrg8cyya4a"))))))

(package
  (inherit usbmuxd)
  (inputs (modify-inputs (package-inputs usbmuxd)
            (replace "libusb" libusb-1.0.25))))