bug#27260: [PATCH] gnu: Add qgpgme.

bug#27260: [PATCH] gnu: Add qgpgme.

[Hartmut Goebel]

* gnu/packages/gnupg.scm (qgpgme): New variable.
---
 gnu/packages/gnupg.scm | 28 ++++++++++++++++++++++++++++
 1 file changed, 28 insertions(+)

diff --git a/gnu/packages/gnupg.scm b/gnu/packages/gnupg.scm
index c2b0278..30d5744 100644
--- a/gnu/packages/gnupg.scm
+++ b/gnu/packages/gnupg.scm
@@ -407,6 +407,34 @@ instead.  This way bug fixes or improvements can be done at a central place
 and every application benefits from this.")
     (license license:lgpl2.1+)))
 
+(define-public qgpgme
+  (package
+    (inherit gpgme)
+    (name "qgpgme")
+    (arguments
+     `(#:phases
+       (modify-phases %standard-phases
+         (add-before 'build 'chdir-and-symlink
+           (lambda* (#:key inputs #:allow-other-keys)
+             (let ((gpgme (assoc-ref inputs "gpgme")))
+               (symlink (string-append gpgme "/lib/libgpgmepp.la")
+                        "lang/cpp/src/libgpgmepp.la")
+               (symlink (string-append gpgme "/lib/libgpgme.la")
+                        "src/libgpgme.la"))
+             (chdir "lang/qt"))))))
+    (native-inputs
+     `(("pkg-config" ,pkg-config)))
+    (inputs
+     `(("gpgme" ,gpgme)
+       ("qtbase" ,qtbase)
+       ,@(package-inputs gpgme)))
+    (synopsis "Qt API bindings for gpgme")
+    (description "QGpgme provides a very high level Qt API around GpgMEpp.
+
+QGpgME was originally developed as part of libkleo and incorporated into
+gpgpme starting with version 1.7.")
+    (license license:gpl2+))) ;; Note: this differs from gpgme
+
 (define-public python-gpg
   (package
     (name "python-gpg")
-- 
2.7.4

bug#27260: Note: the official name is "QGpgME"

[Hartmut Goebel]

Please note that this package's official name is "QGpgME", not
"qt-gpgme", as we called it on the guix-devel mailinglist.

See
https://git.gnupg.org/cgi-bin/gitweb.cgi?p=gpgme.git;a=blob_plain;f=lang/qt/README

-- 
Regards
Hartmut Goebel

| Hartmut Goebel          | h.goebel@crazy-compilers.com               |
| www.crazy-compilers.com | compilers which you thought are impossible |

bug#27260: [PATCH] gnu: Add qgpgme.

[Danny Milosavljevic]

Hi Hartmut,

On Mon,  5 Jun 2017 23:43:33 +0200
Hartmut Goebel <h.goebel@crazy-compilers.com> wrote:

> * gnu/packages/gnupg.scm (qgpgme): New variable.
> ---
>  gnu/packages/gnupg.scm | 28 ++++++++++++++++++++++++++++
>  1 file changed, 28 insertions(+)
> 
> diff --git a/gnu/packages/gnupg.scm b/gnu/packages/gnupg.scm
> index c2b0278..30d5744 100644
> --- a/gnu/packages/gnupg.scm
> +++ b/gnu/packages/gnupg.scm
> @@ -407,6 +407,34 @@ instead.  This way bug fixes or improvements can be done at a central place
>  and every application benefits from this.")
>      (license license:lgpl2.1+)))
>  
> +(define-public qgpgme
> +  (package
> +    (inherit gpgme)
> +    (name "qgpgme")
> +    (arguments
> +     `(#:phases
> +       (modify-phases %standard-phases
> +         (add-before 'build 'chdir-and-symlink
> +           (lambda* (#:key inputs #:allow-other-keys)
> +             (let ((gpgme (assoc-ref inputs "gpgme")))
> +               (symlink (string-append gpgme "/lib/libgpgmepp.la")
> +                        "lang/cpp/src/libgpgmepp.la")
> +               (symlink (string-append gpgme "/lib/libgpgme.la")
> +                        "src/libgpgme.la"))
> +             (chdir "lang/qt"))))))

Nice!

Please end the phase in #t.

Otherwise LGTM!

bug#27260: [PATCH] gnu: Add qgpgme.

[Hartmut Goebel]

Added the #t
pushed as 6b982a7846780c90e67ed872b30e1f4d6aa819dc

Thanks for reviewing.