[bug#31084] [PATCH 2/2] gnu: Add qBittorrent.

[bug#31084] [PATCH 2/2] gnu: Add qBittorrent.

[Fis Trivial]

* gnu/packages/bittorrent.scm (qBittorrent): New public variable.
---
 gnu/packages/bittorrent.scm | 45 +++++++++++++++++++++++++++++++++++++++++++++
 1 file changed, 45 insertions(+)

diff --git a/gnu/packages/bittorrent.scm b/gnu/packages/bittorrent.scm
index b168f88e0..6c804af70 100644
--- a/gnu/packages/bittorrent.scm
+++ b/gnu/packages/bittorrent.scm
@@ -53,6 +53,7 @@
   #:use-module (gnu packages ncurses)
   #:use-module (gnu packages pkg-config)
   #:use-module (gnu packages python)
+  #:use-module (gnu packages qt)
   #:use-module (gnu packages ssh)
   #:use-module (gnu packages tls)
   #:use-module (gnu packages xml))
@@ -408,4 +409,48 @@ focusing on efficiency and scalability.  It runs on embedded devices as well as
 desktops.")
     (license l:bsd-2)))
 
+(define-public qbittorrent
+  (package
+    (name "qbittorrent")
+    (version "4.0.4")
+    (source (origin
+              (method url-fetch)
+              (uri (string-append
+                    "https://github.com/qbittorrent/qBittorrent/archive/release-"
+                    version
+                    ".tar.gz"))
+              (file-name (string-append
+                          name "-release-" version ".tar.gz"))
+              (sha256
+               (base32
+                "145r4lv7rqdhrm5znn3ndxsfdf579n46zvj7c53c422am8ir5xhp"))))
+    (build-system gnu-build-system)
+    (arguments
+     `(#:configure-flags
+       (list
+        (string-append "--with-boost-libdir="
+                       (assoc-ref %build-inputs "boost")
+                       "/lib")
+        "--enable-debug"
+        "QMAKE_LRELEASE=lrelease")))
+    (native-inputs
+     `(("pkg-config" ,pkg-config)
+       ("qttools" ,qttools)))
+    (inputs
+     `(("boost" ,boost)
+       ("libtorrent-rasterbar" ,libtorrent-rasterbar)
+       ("openssl" ,openssl)
+       ("python" ,python)
+       ("qtbase" ,qtbase)
+       ("qtsvg" ,qtsvg)
+       ("zlib" ,zlib)))
+    (home-page "https://www.qbittorrent.org/")
+    (synopsis "BitTorrent client")
+    (description
+     "qBittorrent is a bittorrent client programmed in C++ / Qt that uses
+ libtorrent (sometimes called libtorrent-rasterbar) by Arvid Norberg.
 
+It aims to be a good alternative to all other bittorrent clients out there.
+ qBittorrent is fast, stable and provides unicode support as well as many
+ features.")
+    (license l:gpl2+)))
-- 
2.14.3

bug#31084: [PATCH 2/2] gnu: Add qBittorrent.

[Ludovic Courtès]

[-- Attachment #1: Type: text/plain, Size: 165 bytes --]

Fis Trivial <ybbs.daans@hotmail.com> skribis:

> * gnu/packages/bittorrent.scm (qBittorrent): New public variable.

Applied with the changes below, thanks!

Ludo'.


[-- Attachment #2: Type: text/x-patch, Size: 2620 bytes --]

diff --git a/gnu/packages/bittorrent.scm b/gnu/packages/bittorrent.scm
index 6c804af70..c6b9d74f3 100644
--- a/gnu/packages/bittorrent.scm
+++ b/gnu/packages/bittorrent.scm
@@ -7,6 +7,7 @@
 ;;; Copyright © 2016 Tomáš Čech <sleep_walker@gnu.org>
 ;;; Copyright © 2016, 2017, 2018 Tobias Geerinckx-Rice <me@tobias.gr>
 ;;; Copyright © 2017 Jelle Licht <jlicht@fsfe.org>
+;;; Copyright © 2018 Fis Trivial <ybbs.daans@hotmail.com>
 ;;;
 ;;; This file is part of GNU Guix.
 ;;;
@@ -417,22 +418,19 @@ desktops.")
               (method url-fetch)
               (uri (string-append
                     "https://github.com/qbittorrent/qBittorrent/archive/release-"
-                    version
-                    ".tar.gz"))
-              (file-name (string-append
-                          name "-release-" version ".tar.gz"))
+                    version ".tar.gz"))
+              (file-name (string-append name "-release-" version ".tar.gz"))
               (sha256
                (base32
                 "145r4lv7rqdhrm5znn3ndxsfdf579n46zvj7c53c422am8ir5xhp"))))
     (build-system gnu-build-system)
     (arguments
      `(#:configure-flags
-       (list
-        (string-append "--with-boost-libdir="
-                       (assoc-ref %build-inputs "boost")
-                       "/lib")
-        "--enable-debug"
-        "QMAKE_LRELEASE=lrelease")))
+       (list (string-append "--with-boost-libdir="
+                            (assoc-ref %build-inputs "boost")
+                            "/lib")
+             "--enable-debug"
+             "QMAKE_LRELEASE=lrelease")))
     (native-inputs
      `(("pkg-config" ,pkg-config)
        ("qttools" ,qttools)))
@@ -445,12 +443,12 @@ desktops.")
        ("qtsvg" ,qtsvg)
        ("zlib" ,zlib)))
     (home-page "https://www.qbittorrent.org/")
-    (synopsis "BitTorrent client")
+    (synopsis "Graphical BitTorrent client")
     (description
-     "qBittorrent is a bittorrent client programmed in C++ / Qt that uses
- libtorrent (sometimes called libtorrent-rasterbar) by Arvid Norberg.
+     "qBittorrent is a BitTorrent client programmed in C++/Qt that uses
+libtorrent (sometimes called libtorrent-rasterbar) by Arvid Norberg.
 
-It aims to be a good alternative to all other bittorrent clients out there.
- qBittorrent is fast, stable and provides unicode support as well as many
- features.")
+It aims to be a good alternative to all other BitTorrent clients out there.
+qBittorrent is fast, stable and provides unicode support as well as many
+features.")
     (license l:gpl2+)))