09/11: gnu: highlight: Fix paths for Perl bindings.

[guix-commits]

civodul pushed a commit to branch master
in repository guix.

commit 03bc7bee942cb14edd709dbd14725e5e2c0e289f
Author: gemmaro <gemmaro.dev@gmail.com>
AuthorDate: Mon Aug 7 23:05:42 2023 +0900

    gnu: highlight: Fix paths for Perl bindings.
    
    * gnu/packages/pretty-print.scm (highlight): Fix paths for Perl bindings.
    [arguments]<phases>: Set hl_data_dir and hl_conf_dir in 
install-perl-bindings phase.
    
    Signed-off-by: Ludovic Courtès <ludo@gnu.org>
---
 gnu/packages/pretty-print.scm | 11 ++++++++---
 1 file changed, 8 insertions(+), 3 deletions(-)

diff --git a/gnu/packages/pretty-print.scm b/gnu/packages/pretty-print.scm
index f8763b7b74..5d15b160f3 100644
--- a/gnu/packages/pretty-print.scm
+++ b/gnu/packages/pretty-print.scm
@@ -414,14 +414,19 @@ seen in a terminal.")
                                       (string-append "PREFIX=" out)))))
                         (add-after 'install 'install-perl-bindings
                           (lambda* (#:key outputs #:allow-other-keys)
-                            (let* ((perldir (string-append (assoc-ref outputs
-                                                                      "out")
+                            (let* ((out (assoc-ref outputs "out"))
+                                   (data (string-append out
+                                                        "/share/highlight/"))
+                                   (conf (string-append out "/etc/highlight/"))
+                                   (perldir (string-append out
                                              "/lib/perl5/site_perl/"
                                              #$(package-version perl)))
                                    (autodir (string-append perldir
                                                            "/auto/highlight")))
                               (with-directory-excursion "extras/swig"
-                                (invoke "make" "perl")
+                                (invoke "make" "perl"
+                                        (string-append "hl_data_dir=" data)
+                                        (string-append "hl_conf_dir=" conf))
                                 (invoke "perl" "-I" "." "testmod.pl")
                                 (install-file "highlight.pm" perldir)
                                 (install-file "highlight.so" autodir)))))