guix-devel
[Top][All Lists]
Advanced

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

[PATCH 6/8] gnu: Add qsyncthingtray.


From: Efraim Flashner
Subject: [PATCH 6/8] gnu: Add qsyncthingtray.
Date: Mon, 21 Nov 2016 23:00:33 +0200

* gnu/packages/sync.scm (qsyncthingtray): New variable.
---
 gnu/packages/sync.scm | 55 +++++++++++++++++++++++++++++++++++++++++++++++++++
 1 file changed, 55 insertions(+)

diff --git a/gnu/packages/sync.scm b/gnu/packages/sync.scm
index 186914d..058d26a 100644
--- a/gnu/packages/sync.scm
+++ b/gnu/packages/sync.scm
@@ -103,3 +103,58 @@ to and a server to synchronize to.  You can configure more 
computers to
 synchronize to the same server and any change to the files on one computer will
 silently and reliably flow across to every other.")
     (license license:gpl2+)))
+
+(define-public qsyncthingtray
+  (package
+    (name "qsyncthingtray")
+    (version "0.5.5rc2")
+    (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"))
+        (sha256
+         (base32
+          "0wygq9sfayyhd3ff31yfs5lfl3vnk79i9mnj6m4pgi9zlvdipi80"))))
+    (build-system cmake-build-system)
+    (arguments
+     `(#:configure-flags '("-DQST_BUILD_WEBKIT=1")
+       #:phases
+       (modify-phases %standard-phases
+         ;; The program is meant to be run from the git repo or source tarball.
+         (replace 'install
+           (lambda* (#:key outputs #:allow-other-keys)
+             (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"))
+               #t))))
+       #:tests? #f)) ; no test target
+    (inputs
+     `(("qtbase" ,qtbase)
+       ("qtwebkit" ,qtwebkit)))
+    (home-page "https://github.com/sieren/QSyncthingTray";)
+    (synopsis "Traybar Application for Syncthing")
+    (description
+     "A traybar application for syncthing.
address@hidden
address@hidden Shows number of connections at a glance.
address@hidden Traffic statistics about incoming, outgoing and total throughput.
address@hidden Launches Syncthing and Syncthing-iNotifier if specified.
address@hidden Quickly pause Syncthing with one click.
address@hidden Last Synced Files - Quickly see the recently synchronised files 
and open
+their folder.
address@hidden Quick Access to all shared folders.
address@hidden Presents Syncthing UI in a separate view instead of using the 
browser.
address@hidden Supports authenticated HTTPS connections.
address@hidden Uses System Notifications about current connection status.
address@hidden Toggle for monochrome icon.
address@hidden enumerate\n")
+    (license license:lgpl3+)))
-- 
2.10.2




reply via email to

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