guix-commits
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

07/10: gnu: tmux-themepack: Use GIT-* helpers, not NAME.


From: guix-commits
Subject: 07/10: gnu: tmux-themepack: Use GIT-* helpers, not NAME.
Date: Thu, 14 Feb 2019 13:53:21 -0500 (EST)

nckx pushed a commit to branch master
in repository guix.

commit 7bef8fd5cf849ca3732e03632f40fa253599ae0a
Author: Tobias Geerinckx-Rice <address@hidden>
Date:   Thu Feb 14 15:46:19 2019 +0100

    gnu: tmux-themepack: Use GIT-* helpers, not NAME.
    
    * gnu/packages/tmux.scm (tmux-themepack)[version]: Use GIT-VERSION.
    [source]: Hard-code NAME.  Use GIT-FILE-NAME.
---
 gnu/packages/tmux.scm | 11 +++++------
 1 file changed, 5 insertions(+), 6 deletions(-)

diff --git a/gnu/packages/tmux.scm b/gnu/packages/tmux.scm
index d8af54c..fc2871e 100644
--- a/gnu/packages/tmux.scm
+++ b/gnu/packages/tmux.scm
@@ -4,6 +4,7 @@
 ;;; Copyright © 2016 Matthew Jordan <address@hidden>
 ;;; Copyright © 2017 Vasile Dumitrascu <address@hidden>
 ;;; Copyright © 2017 Stefan Reichör <address@hidden>
+;;; Copyright © 2019 Tobias Geerinckx-Rice <address@hidden>
 ;;;
 ;;; This file is part of GNU Guix.
 ;;;
@@ -61,21 +62,19 @@ continue running in the background, then later reattached.")
         (revision "1"))
     (package
       (name "tmux-themepack")
-      (version
-       (string-append "0.0.0-" revision "." (string-take commit 7))) ;; No 
version tags
+      (version (git-version "0.0.0" revision commit)) ; no version tags
       (source (origin
                 (method git-fetch)
                 (uri (git-reference
-                      (url
-                       (string-append "https://github.com/jimeh/"; name ".git"))
+                      (url "https://github.com/jimeh/tmux-themepack.git";)
                       (commit commit)))
                 (sha256
                  (base32
                   "1d3k87mq5lca042jbap5kxskjy3kg79wjhhpnm6jacbn3anc67zl"))
-                (file-name (string-append name "-" version "-checkout"))))
+                (file-name (git-file-name name version))))
       (build-system gnu-build-system)
       (arguments
-       `(#:tests? #f ; No test suite.
+       `(#:tests? #f                    ; no test suite
          #:phases (modify-phases %standard-phases
                     (delete 'configure)
                     (delete 'build)



reply via email to

[Prev in Thread] Current Thread [Next in Thread]