ryan77627/guix
1
0
Fork 0
mirror of https://git.in.rschanz.org/ryan77627/guix.git synced 2024-12-25 05:48:07 -05:00
Code Issues Projects Releases Packages Wiki Activity Actions

gnu: gsm: Update to 1.0.20.

Browse source 
* gnu/packages/audio.scm (gsm): Update to 1.0.20.
[arguments]: Don't explicitly return #t from phases.
This commit is contained in:
Tobias Geerinckx-Rice 2022-07-17 02:00:03 +02:00
parent 64466063ec
commit 2dc229a30e
No known key found for this signature in database
GPG key ID: 0DB0FF884F556D79
1 changed files with 5 additions and 9 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

14
gnu/packages/audio.scm
View file

@ -4352,7 +4352,7 @@ (define-public filteraudio
(define-public gsm (define-public gsm
(package (package
(name "gsm") (name "gsm")
(version "1.0.19") (version "1.0.20")
(source (source
(origin (origin
(method url-fetch) (method url-fetch)
@ -4360,8 +4360,7 @@ (define-public gsm
(string-append "http://www.quut.com/" name "/" name (string-append "http://www.quut.com/" name "/" name
"-" version ".tar.gz")) "-" version ".tar.gz"))
(sha256 (sha256
(base32 (base32 "1gwhmqs24c14gc9qr91iqb2jkbr3qqy4dvf27yf8j7mq322w65b3"))))
"1xkha9ss5g5qnfaybi8il0mcvp8knwg9plgh8404vh58d0pna0s9"))))
(build-system gnu-build-system) (build-system gnu-build-system)
(arguments (arguments
`(#:test-target "tst" `(#:test-target "tst"
@ -4374,8 +4373,7 @@ (define-public gsm
;; mediastreamer. ;; mediastreamer.
(substitute* "Makefile" (substitute* "Makefile"
(("^CCFLAGS.*" all) (("^CCFLAGS.*" all)
(string-append all "CCFLAGS += -fPIC\n"))) (string-append all "CCFLAGS += -fPIC\n")))))
#t))
(add-before 'install 'pre-install (add-before 'install 'pre-install
(lambda _ (lambda _
(let ((out (assoc-ref %outputs "out"))) (let ((out (assoc-ref %outputs "out")))
@ -4384,8 +4382,7 @@ (define-public gsm
(mkdir-p (string-append out "/man/man1")) (mkdir-p (string-append out "/man/man1"))
(mkdir-p (string-append out "/man/man3")) (mkdir-p (string-append out "/man/man3"))
(mkdir-p (string-append out "/bin")) (mkdir-p (string-append out "/bin"))
(mkdir-p (string-append out "/lib"))) (mkdir-p (string-append out "/lib")))))
#t))
(add-after 'install 'post-install (add-after 'install 'post-install
(lambda _ (lambda _
(let ((out (assoc-ref %outputs "out"))) (let ((out (assoc-ref %outputs "out")))
@ -4393,8 +4390,7 @@ (define-public gsm
(string-append out "/include")) (string-append out "/include"))
(mkdir-p (string-append out "/include/gsm")) (mkdir-p (string-append out "/include/gsm"))
(copy-recursively "inc" (copy-recursively "inc"
(string-append out "/include/gsm"))) (string-append out "/include/gsm")))))
#t))
(delete 'configure)))) ; no configure script (delete 'configure)))) ; no configure script
(synopsis "GSM 06.10 lossy speech compression library") (synopsis "GSM 06.10 lossy speech compression library")
(description "This C library provides an encoder and a decoder for the GSM (description "This C library provides an encoder and a decoder for the GSM