GNU bug report logs - #25966
Fix bug 25957 and updates gitolite

Previous Next

Package: guix-patches;

Reported by: ng0 <contact.ng0 <at> cryptolab.net>

Date: Sat, 4 Mar 2017 12:59:02 UTC

Severity: normal

Done: Leo Famulari <leo <at> famulari.name>

Bug is archived. No further changes may be made.

Full log


View this message in rfc822 format

From: contact.ng0 <at> cryptolab.net
To: 25966 <at> debbugs.gnu.org
Cc: ng0 <contact.ng0 <at> cryptolab.net>
Subject: bug#25966: [PATCH 2/2] gnu: gitolite: Fix shebangs in hooks.
Date: Sat,  4 Mar 2017 14:09:32 +0000
From: ng0 <contact.ng0 <at> cryptolab.net>

Fixes <https://bugs.gnu.org/25957>.

* gnu/packages/version-control.scm (gitolite)[arguments]: Add 'fix-hooks-shebangs'
phase to fix references to '/usr/bin/perl'.
---
 gnu/packages/version-control.scm | 11 +++++++++++
 1 file changed, 11 insertions(+)

diff --git a/gnu/packages/version-control.scm b/gnu/packages/version-control.scm
index 1076c1890..ccda00173 100644
--- a/gnu/packages/version-control.scm
+++ b/gnu/packages/version-control.scm
@@ -616,6 +616,17 @@ also walk each side of a merge and test those changes individually.")
                         (substitute* (find-files "." ".*")
                           ((" perl -")
                            (string-append " " perl " -"))))))
+                  (add-before 'install 'fix-hooks-shebangs
+                    (lambda* (#:key inputs #:allow-other-keys)
+                      (let ((perl (string-append (assoc-ref inputs "perl")
+                                                 "/bin/perl")))
+                        ;; The files in 'lib/Gitolite/Hooks' keep references to
+                        ;; '/usr/bin/perl', without this fix it is impossible to
+                        ;; to run gitolite in production.
+                        (substitute* (find-files "src/lib/Gitolite/Hooks" ".*")
+                          (("/usr/bin/perl")
+                           perl))
+                        #t)))
                   (replace 'install
                     (lambda* (#:key outputs #:allow-other-keys)
                       (let* ((output (assoc-ref outputs "out"))
-- 
2.12.0





This bug report was last modified 8 years and 70 days ago.

Previous Next


GNU bug tracking system
Copyright (C) 1999 Darren O. Benham, 1997,2003 nCipher Corporation Ltd, 1994-97 Ian Jackson.