diff mbox series

[bug#42229,1/9] gnu: libring: Fetch from git, update to 20200702-guix.

Message ID 20200706155030.1938-1-tona_kosmicznego_smiecia@interia.pl
State Accepted
Headers show
Series [bug#42229,1/9] gnu: libring: Fetch from git, update to 20200702-guix. | expand

Checks

Context Check Description
cbaines/comparison success View comparision
cbaines/git branch success View Git branch
cbaines/applying patch success View Laminar job

Commit Message

Jan Wielkiewicz July 6, 2020, 3:50 p.m. UTC
* gnu/packages/jami.scm
(define-module): Use the "backup" module.
(%jami-version, %libring-commit, %libring-revision): New variables.
(jami-source): Rename procedure to (libring-source).
(libring-source)[without-daemon]: Rename keyword to [without-contrib].
[origin]: Fetch from git, update path to the contrib directory,
update hash and commit.
(libring)[source]: Use (libring-source).
[version]: Use the (%jami-version, %libring-commit, %libring-revision) variables.
[inputs]: Add libarchive, remove obsolete comment - there's pjproject-jami already.
[arguments]: Do not chdir to "daemon" - due to fetching from git,
we're in the proper directory already.
---
 gnu/packages/jami.scm | 36 +++++++++++++++++++-----------------
 1 file changed, 19 insertions(+), 17 deletions(-)
diff mbox series

Patch

diff --git a/gnu/packages/jami.scm b/gnu/packages/jami.scm
index d5cb3b62f6..d94a162772 100644
--- a/gnu/packages/jami.scm
+++ b/gnu/packages/jami.scm
@@ -23,6 +23,7 @@ 
   #:use-module (gnu packages aidc)
   #:use-module (gnu packages audio)
   #:use-module (gnu packages autotools)
+  #:use-module (gnu packages backup)
   #:use-module (gnu packages base)
   #:use-module (gnu packages boost)
   #:use-module (gnu packages check)
@@ -62,23 +63,29 @@ 
   #:use-module (guix utils)
   #:use-module (srfi srfi-1))
 
-(define %jami-version "20200401.1.6f090de")
+(define %jami-version "20200702-guix")
+(define %libring-commit "0e36d0b352d543437f0f744230c2eb8c0bc77f36")
+(define %libring-revision "0")
 
-(define* (jami-source #:key without-daemon)
+(define* (libring-source #:key without-contrib)
   (origin
-    (method url-fetch)
-    (uri (string-append "https://dl.jami.net/release/tarballs/jami_"
-                        %jami-version
-                        ".tar.gz"))
+    (method git-fetch)
+    (uri (git-reference
+          (url "https://review.jami.net/ring-daemon")
+          (commit %libring-commit)))
+    (file-name (git-file-name (if without-contrib
+                                  "libring-source-without-contrib"
+                                  "libring-source")
+                              %jami-version))
     (modules '((guix build utils)))
     (snippet
-     (if without-daemon
+     (if without-contrib
          '(begin
-            (delete-file-recursively "daemon/contrib"))
+            (delete-file-recursively "contrib"))
          #f))
     (sha256
      (base32
-      "0lryx9n1jn0jsw7s10pbwivqv0d5m3jdzhdhdyg5n02v72mjvkmh"))))
+      "1877sar32rz80pvhksxf4w0g05w4h4nq78rb7krdjmjq6vmnip1p"))))
 
 ;; Savoir-Faire Linux modifies many libraries to add features
 ;; to Jami. This procedure makes applying patches to a given
@@ -441,8 +448,8 @@ 
 (define-public libring
   (package
     (name "libring")
-    (version %jami-version)
-    (source (jami-source #:without-daemon #t))
+    (version (git-version %jami-version %libring-revision %libring-commit))
+    (source (libring-source #:without-contrib #t))
     (build-system gnu-build-system)
     (inputs
      `(("alsa-lib" ,alsa-lib)
@@ -462,6 +469,7 @@ 
        ("opus" ,opus)
        ("pcre" ,pcre)
        ("pulseaudio" ,pulseaudio)
+       ("libarchive" ,libarchive)
        ("libsamplerate" ,libsamplerate)
        ("libsndfile" ,libsndfile)
        ("speex" ,speex)
@@ -479,8 +487,6 @@ 
        ("restinio" ,restinio)
        ("libx11" ,libx11)
        ("asio" ,asio)
-       ;; TODO: Upstream seems to rely on a custom pjproject (a.k.a. pjsip) version.
-       ;; See https://git.jami.net/savoirfairelinux/ring-daemon/issues/24.
        ("pjproject" ,pjproject-jami)))
     (native-inputs
      `(("autoconf" ,autoconf)
@@ -494,10 +500,6 @@ 
      `(#:tests? #f         ; The tests fail to compile due to missing headers.
        #:phases
        (modify-phases %standard-phases
-         (add-after 'unpack 'change-directory
-           (lambda _
-             (chdir "daemon")
-             #t))
          (add-before 'build 'add-lib-dir
            (lambda _
              (mkdir-p "src/lib")