[bug#64443] [PATCH v1] gnu: Add gp-saml-gui

[Bruno Victal]

Hi,

On 2023-07-04 11:58, Unstable Horse wrote:
> +      (arguments
> +       `(#:phases
> +         (modify-phases %standard-phases
> +           (add-after 'install 'wrap-program
> +             (lambda* (#:key outputs #:allow-other-keys)
> +               (wrap-program
> +                   (string-append (assoc-ref outputs "out") 
> "/bin/gp-saml-gui")
> +                 `("GUIX_PYTHONPATH" ":" prefix
> +                   (,(getenv "GUIX_PYTHONPATH")))
> +                 `("GI_TYPELIB_PATH" ":" prefix
> +                   (,(getenv "GI_TYPELIB_PATH")))))))))

I'd use G-Expressions and write this part as:

--8<---------------cut here---------------start------------->8---
(list
 #:phases
 #~(modify-phases %standard-phases
     (add-after 'install 'wrap-program
       (lambda _
         (let ((prog (string-append #$output "/bin/gp-saml-gui")))
           (wrap-program prog
             `("GUIX_PYTHONPATH" = (,(getenv "GUIX_PYTHONPATH")))
             `("GI_TYPELIB_PATH" = (,(getenv "GI_TYPELIB_PATH")))))))))
--8<---------------cut here---------------end--------------->8---

Another thing, your email client mangled this patch since I had to do
some sed magic to remove the Unicode non-breaking spaces.
Please use 'git send-email' as it doesn't exhibit this behavior.


-- 
Furthermore, I consider that nonfree software must be eradicated.

Cheers,
Bruno.