Leo Famulari <l...@famulari.name> writes:
> On Sat, May 28, 2016 at 06:08:57PM -0500, Lukas Gradl wrote:
>> + #:use-module (gnu packages autotools)
> ^
> Also, there is some extra whitespace at the end of the line above.
>
Oops! Good catch!
>> + (uri
>> + (string-append
>> + "https://gitlab.savoirfairelinux.com/sflphone/libiax2/";
>> + "repository/archive.tar.gz?ref="
>> + commit))
>
> Can you use (file-name ...) to make the file-name like
> libiax-version.tar.gz?
>
I updated this in the attached patch.
Thank you for your review!
>From 581f899fe2ff3db7151b5d488dc00c77ca9602bd Mon Sep 17 00:00:00 2001
From: Lukas Gradl <lgr...@openmailbox.org>
Date: Mon, 30 May 2016 14:40:51 -0500
Subject: [PATCH] gnu: telephony: Add libiax.
* gnu/packages/telephony.scm (libiax): New variable.
---
gnu/packages/telephony.scm | 36 ++++++++++++++++++++++++++++++++++++
1 file changed, 36 insertions(+)
diff --git a/gnu/packages/telephony.scm b/gnu/packages/telephony.scm
index 50a83fb..0f43e79 100644
--- a/gnu/packages/telephony.scm
+++ b/gnu/packages/telephony.scm
@@ -3,6 +3,7 @@
;;; Copyright © 2015 Andreas Enge <andr...@enge.fr>
;;; Copyright © 2015 David Hashe <david.ha...@dhashe.com>
;;; Copyright © 2015 Efraim Flashner <efr...@flashner.co.il>
+;;; Copyright © 2016 Lukas Gradl <lgr...@openmailbox.org>
;;;
;;; This file is part of GNU Guix.
;;;
@@ -21,6 +22,7 @@
(define-module (gnu packages telephony)
#:use-module (gnu packages)
+ #:use-module (gnu packages autotools)
#:use-module (gnu packages gnupg)
#:use-module (gnu packages linux)
#:use-module (gnu packages pkg-config)
@@ -211,3 +213,37 @@ Real-time Transport Protocol (SRTP), the Universal Security Transform (UST),
and a supporting cryptographic kernel.")
(home-page "https://github.com/cisco/libsrtp";)
(license bsd-3)))
+
+(define-public libiax
+ (let ((commit "0e5980f1d78ce462e2d1ed6bc39ff35c8341f201"))
+ ;; This is the commit used by the Ring Project.
+ (package
+ (name "libiax")
+ (version (string-append "0.0.0-1." (string-take commit 7)))
+ (source
+ (origin
+ (method url-fetch)
+ (uri
+ (string-append
+ "https://gitlab.savoirfairelinux.com/sflphone/libiax2/";
+ "repository/archive.tar.gz?ref="
+ commit))
+ (file-name (string-append name "-" version ".tar.gz"))
+ (sha256
+ (base32
+ "0cj5293bixp3k5x3hjwyd0iq7z8w5p7yavxvvkqk5817hjq386y2"))))
+ (build-system gnu-build-system)
+ (native-inputs
+ `(("autoconf" ,autoconf)
+ ("automake" ,automake)
+ ("libtool" ,libtool)))
+ (arguments
+ `(#:phases (modify-phases %standard-phases
+ (add-before 'configure 'autoconf
+ (lambda _
+ (zero? (system* "autoreconf" "-vfi")))))))
+ (home-page "https://gitlab.savoirfairelinux.com/sflphone/libiax2";)
+ (synopsis "Inter-Asterisk-Protocol library")
+ (description "LibIAX implements the Inter-Asterisk-Protocol for relaying
+Voice-over-IP (VoIP) communications.")
+ (license lgpl2.0))))
--
2.7.4
