04/09: gnu: qsstv: Update to 9.5.8.

[guix-commits]

glv pushed a commit to branch master
in repository guix.

commit 8e14a7f809ed2b7257d838f45364e8b839650e3d
Author: Guillaume Le Vaillant <glv@posteo.net>
AuthorDate: Fri Dec 17 14:15:26 2021 +0100

    gnu: qsstv: Update to 9.5.8.
    
    * gnu/packages/radio.scm (qsstv): Update to 9.5.8.
      [arguments]: Remove 'fix-newer-hamlib-support' phase.
---
 gnu/packages/radio.scm | 12 +++---------
 1 file changed, 3 insertions(+), 9 deletions(-)

diff --git a/gnu/packages/radio.scm b/gnu/packages/radio.scm
index ac9edf5..870f69d 100644
--- a/gnu/packages/radio.scm
+++ b/gnu/packages/radio.scm
@@ -1450,14 +1450,14 @@ NanoVNA vector network analyzers.")
 (define-public qsstv
   (package
     (name "qsstv")
-    (version "9.4.4")
+    (version "9.5.8")
     (source
      (origin
        (method url-fetch)
        (uri (string-append "http://users.telenet.be/on4qz/qsstv/downloads/";
                            "qsstv_" version ".tar.gz"))
        (sha256
-        (base32 "0f9hx6sy418cb23fadll298pqbc5l2lxsdivi4vgqbkvx7sw58zi"))))
+        (base32 "0s3sivc0xan6amibdiwfnknrl3248wzgy98w6gyxikl0qsjpygy0"))))
     (build-system qt-build-system)
     (native-inputs
      (list pkg-config))
@@ -1474,16 +1474,10 @@ NanoVNA vector network analyzers.")
      `(#:tests? #f  ; No test suite.
        #:phases
        (modify-phases %standard-phases
-         (add-after 'unpack 'fix-newer-hamlib-support
-           (lambda _
-             (substitute* "qsstv/rig/rigcontrol.cpp"
-               (("FILPATHLEN")
-                "HAMLIB_FILPATHLEN"))))
          (replace 'configure
            (lambda* (#:key outputs #:allow-other-keys)
              (invoke "qmake"
-                     (string-append "PREFIX=" (assoc-ref outputs "out")))
-             #t)))))
+                     (string-append "PREFIX=" (assoc-ref outputs "out"))))))))
     (home-page "http://users.telenet.be/on4qz/qsstv/";)
     (synopsis "Program for receiving and transmitting SSTV and HAMDRM")
     (description