gnu: usbredir: Add git commit to version.

* gnu/packages/spice.scm (usbredir)[version]: Add commit and revision to version
  string.

gnu/packages/spice.scm

@@ -44,49 +44,53 @@
   #:use-module (guix utils))
 
 (define-public usbredir
-  (package
+  (let ((commit "ac80a5971c6318d73d5fba4b5f13d3a9389558c9")
-    (name "usbredir")
+        (revision "1"))          ;Guix package revision
-    (version "0.7.1")
+    (package
-    ;(source (origin
+      (name "usbredir")
-    ;          (method url-fetch)
+      (version (string-append "0.7.1-" revision "."
-    ;          (uri (string-append
+                              (string-take commit 7)))
-    ;            "http://spice-space.org/download/usbredir/"
+      ;(version "0.7.1")
-    ;            "usbredir-" version ".tar.bz2"))
+      ;(source (origin
-    ;          (sha256
+      ;          (method url-fetch)
-    ;           (base32
+      ;          (uri (string-append
-    ;            "1wsnmk4wjpdhbn1zaxg6bmyxspcki2zgy0am9lk037rnl4krwzj0"))))
+      ;            "http://spice-space.org/download/usbredir/"
-    ; FIXME: usbredir 0.7.1 release doesn't build on 32 bit systems.
+      ;            "usbredir-" version ".tar.bz2"))
-    ;        issue is fixed in HEAD
+      ;          (sha256
-    ;        remove 'autogen phase and autoconf, automake, libtool inputs
+      ;           (base32
-    (source (origin
+      ;            "1wsnmk4wjpdhbn1zaxg6bmyxspcki2zgy0am9lk037rnl4krwzj0"))))
-              (method git-fetch)
+      ; FIXME: usbredir 0.7.1 release doesn't build on 32 bit systems.
-              (uri (git-reference
+      ;        issue is fixed in HEAD
-                      (url "http://cgit.freedesktop.org/spice/usbredir")
+      ;        remove 'autogen phase and autoconf, automake, libtool inputs
-                      (commit "ac80a5971c6318d73d5fba4b5f13d3a9389558c9")))
+      (source (origin
-              (sha256
+                (method git-fetch)
-               (base32
+                (uri (git-reference
-                "052fywgi72j68dr5ybldncg4vk8iqfrh58la7iazyxxpph9aag1g"))))
+                        (url "http://cgit.freedesktop.org/spice/usbredir")
-    (build-system gnu-build-system)
+                        (commit commit)))
-    (propagated-inputs
+                (sha256
-      `(("libusb" ,libusb)))
+                 (base32
-    (native-inputs
+                  "052fywgi72j68dr5ybldncg4vk8iqfrh58la7iazyxxpph9aag1g"))))
-      `(("pkg-config" ,pkg-config)
+      (build-system gnu-build-system)
-        ("autoconf" ,autoconf)
+      (propagated-inputs
-        ("automake" ,automake)
+        `(("libusb" ,libusb)))
-        ("libtool" ,libtool)))
+      (native-inputs
+        `(("pkg-config" ,pkg-config)
+          ("autoconf" ,autoconf)
+          ("automake" ,automake)
+          ("libtool" ,libtool)))
     (arguments
      `(#:phases
        (modify-phases %standard-phases
          (add-after 'unpack 'autogen
            (lambda* _
              (system* "sh" "autogen.sh"))))))
-    (synopsis "Tools for sending USB device traffic over a network")
+      (synopsis "Tools for sending USB device traffic over a network")
-    (description "Usbredir is a network protocol for sending USB device traffic
+      (description "Usbredir is a network protocol for sending USB device traffic
-over a network connection.  It can be used to redirect traffic from a USB device
+  over a network connection.  It can be used to redirect traffic from a USB device
-to a different (virtual) machine than the one to which the USB device is
+  to a different (virtual) machine than the one to which the USB device is
-attached.")
+  attached.")
-    (home-page "http://www.spice-space.org")
+      (home-page "http://www.spice-space.org")
-    (license (list license:gpl2+ license:lgpl2.0+ license:lgpl2.1+))))
+      (license (list license:gpl2+ license:lgpl2.0+ license:lgpl2.1+)))))
 
 (define-public virglrenderer
   (package