[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
03/03: gnu: qtsyncthingtray: Use 'git-fetch'.
From: |
guix-commits |
Subject: |
03/03: gnu: qtsyncthingtray: Use 'git-fetch'. |
Date: |
Wed, 2 Jan 2019 12:53:46 -0500 (EST) |
efraim pushed a commit to branch master
in repository guix.
commit afbf9763faf231c27ef25315d4d24379e1762568
Author: Efraim Flashner <address@hidden>
Date: Wed Jan 2 18:25:41 2019 +0200
gnu: qtsyncthingtray: Use 'git-fetch'.
* gnu/packages/sync.scm (qtsyncthingtray)[source]: Use 'git-fetch'.
[arguments]: Update custom 'install phase.
---
gnu/packages/sync.scm | 22 ++++++++++------------
1 file changed, 10 insertions(+), 12 deletions(-)
diff --git a/gnu/packages/sync.scm b/gnu/packages/sync.scm
index 596ef4b..a1d4230 100644
--- a/gnu/packages/sync.scm
+++ b/gnu/packages/sync.scm
@@ -109,14 +109,14 @@ silently and reliably flow across to every other.")
(version "0.5.8")
(source
(origin
- (method url-fetch)
- (uri (string-append
- "https://github.com/sieren/QSyncthingTray/archive/"
- version ".tar.gz"))
- (file-name (string-append name "-" version ".tar.gz"))
+ (method git-fetch)
+ (uri (git-reference
+ (url "https://github.com/sieren/QSyncthingTray")
+ (commit version)))
+ (file-name (git-file-name name version))
(sha256
(base32
- "1024778ml7q62ziqm4d22z5sc1715l34846pwfyzfpcyl32qlhpz"))))
+ "1n9g4j7qznvg9zl6x163pi9f7wsc3x6q76i33psnm7x2v1i22x5w"))))
(build-system cmake-build-system)
(arguments
`(#:configure-flags '("-DQST_BUILD_WEBKIT=1")
@@ -128,12 +128,10 @@ silently and reliably flow across to every other.")
(let* ((out (assoc-ref outputs "out"))
(bin (string-append out "/bin")))
(install-file "QSyncthingTray" bin)
- (install-file (string-append
- "../QSyncthingTray-"
- ,(package-version qsyncthingtray)
- "/resources/images/Icon1024.png")
- (string-append
- out "/share/pixmaps/QSyncthingTray.png"))
+ (mkdir-p (string-append out "/share/pixmaps"))
+ (copy-file "../source/resources/images/Icon1024.png"
+ (string-append
+ out "/share/pixmaps/QSyncthingTray.png"))
#t))))
#:tests? #f)) ; no test target
(inputs