[PATCH 1/2] gnu: perl-xml-simple: Propagate XML::Parser.

[PATCH 1/2] gnu: perl-xml-simple: Propagate XML::Parser.

[宋文武]

* gnu/packages/xml.scm (perl-xml-simple): Move XML::Parser from 'inputs'
  to 'propagated-inputs'.
---
 gnu/packages/xml.scm | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/gnu/packages/xml.scm b/gnu/packages/xml.scm
index 63d0ef2..76366db 100644
--- a/gnu/packages/xml.scm
+++ b/gnu/packages/xml.scm
@@ -179,7 +179,7 @@ module.")
               (base32
                "0jj3jiray1l4pi9wkjcpxjc3v431whdwx5aqnhgdm4i7h3817zsw"))))
     (build-system perl-build-system)
-    (inputs
+    (propagated-inputs
      `(("perl-xml-parser" ,perl-xml-parser)))
     (license (package-license perl))
     (synopsis "Perl module for easy reading/writing of XML files")
-- 
2.1.2

[PATCH 2/2] gnu: icon-naming-utils: Wrap with PERL5LIB to find XML::Simple.

[宋文武]

Fixes <http://bugs.gnu.org/19367>.

* gnu/packages/gnome.scm (icon-naming-utils)[arguments]: New field.
---
 gnu/packages/gnome.scm | 12 ++++++++++++
 1 file changed, 12 insertions(+)

diff --git a/gnu/packages/gnome.scm b/gnu/packages/gnome.scm
index 1ff9e85..a2ef712 100644
--- a/gnu/packages/gnome.scm
+++ b/gnu/packages/gnome.scm
@@ -312,6 +312,18 @@ for settings shared by various components of the GNOME desktop.")
     (inputs
      `(("perl" ,perl)
        ("perl-xml-simple" ,perl-xml-simple)))
+    (arguments
+     '(#:phases
+       (alist-cons-after
+        'install 'set-load-paths
+        ;; Tell 'icon-name-mapping' where XML::Simple is.
+        (lambda* (#:key outputs #:allow-other-keys)
+          (let* ((out  (assoc-ref outputs "out"))
+                 (prog (string-append out "/libexec/icon-name-mapping")))
+            (wrap-program
+             prog
+             `("PERL5LIB" = ,(list (getenv "PERL5LIB"))))))
+        %standard-phases)))
     (home-page "http://tango.freedesktop.org/Standard_Icon_Naming_Specification")
     (synopsis
      "Utility to implement the Freedesktop Icon Naming Specification")
-- 
2.1.2

Re: [PATCH 1/2] gnu: perl-xml-simple: Propagate XML::Parser.

[Ludovic Courtès]

宋文武 <iyzsong@gmail.com> skribis:

> * gnu/packages/xml.scm (perl-xml-simple): Move XML::Parser from 'inputs'
>   to 'propagated-inputs'.

OK, thanks!

Ludo'.

Re: [PATCH 2/2] gnu: icon-naming-utils: Wrap with PERL5LIB to find XML::Simple.

[Ludovic Courtès]

宋文武 <iyzsong@gmail.com> skribis:

> Fixes <http://bugs.gnu.org/19367>.
>
> * gnu/packages/gnome.scm (icon-naming-utils)[arguments]: New field.

LGTM, thanks!

Ludo’.