[bug#51920] [PATCH] gnu: Add inkbox.

[phodina via Guix-patches via <guix-patches@gnu.org>]

* gnu/packages/qt.scm (inkbox): New variable.

diff --git a/gnu/packages/qt.scm b/gnu/packages/qt.scm
index 4625d2220d..0f1744d8e8 100644
--- a/gnu/packages/qt.scm
+++ b/gnu/packages/qt.scm
@@ -3021,6 +3021,42 @@ (define-public python-pyside-2-tools
      "Contains lupdate, rcc and uic tools for PySide2")
     (license license:gpl2)))

+(define-public inkbox
+  (package
+    (name "inkbox")
+    (version "1.7")
+    (source (origin
+              (method git-fetch)
+              (uri
+               (git-reference
+                (url "https://alpinekobox.ddns.net/InkBox/inkbox/")
+                (commit version)))
+              (file-name (git-file-name name version))
+              (sha256
+               (base32
+                "126cqn0ixcn608lv2hd9f7zmzj4g448bnpxc7wv9cvg83qqajh5n"))))
+    (build-system qt-build-system)
+    (arguments
+     '(#:tests? #f
+       #:make-flags
+       (list (string-append "PREFIX="
+                            (assoc-ref %outputs "out")))
+       #:phases
+       (modify-phases %standard-phases
+         (add-after 'unpack 'prefix-opt
+           (lambda* _
+             (substitute* "inkbox.pro"
+               (("/opt/\\$\\$\\{TARGET\\}") (string-append (assoc-ref %outputs "out"))))))
+         (replace 'configure
+           (lambda* (#:key make-flags #:allow-other-keys)
+             (apply invoke (cons "qmake" make-flags)))))))
+    (native-inputs
+     `(("qtbase" ,qtbase-5)))
+    (home-page "https://alpinekobox.ddns.net/InkBox/inkbox/")
+    (synopsis "EBook reader")
+    (description "This package provides InkBox eBook reader.")
+    (license license:gpl1)))
+
 (define-public libqglviewer
   (package
     (name "libqglviewer")
--
2.33.0