[PATCH] gnu: cgit: Fix patch-absolute-file-names phase.

  • Done
  • quality assurance status badge
Details
2 participants
  • muradm
  • Maxim Cournoyer
Owner
unassigned
Submitted by
muradm
Severity
normal
M
M
muradm wrote on 22 Jan 02:20 +0100
(address . guix-patches@gnu.org)
ce8d1fb73934a880ac736dee688956b9827137e1.1705886442.git.mail@muradm.net
Change-Id: I06c624ba23bfd0b8ca45045d1d2155c53258047e
---
gnu/packages/version-control.scm | 4 ++--
1 file changed, 2 insertions(+), 2 deletions(-)

Toggle diff (26 lines)
diff --git a/gnu/packages/version-control.scm b/gnu/packages/version-control.scm
index a7a701629f..8366335b08 100644
--- a/gnu/packages/version-control.scm
+++ b/gnu/packages/version-control.scm
@@ -1148,7 +1148,7 @@ (define-public cgit
(invoke "tar" "--strip-components=1" "-C" "git" "-xf"
(assoc-ref inputs "git-source"))))
(add-after 'unpack 'patch-absolute-file-names
- (lambda* (#:key inputs #:allow-other-keys)
+ (lambda* (#:key inputs outputs #:allow-other-keys)
(define (quoted-file-name input path)
(string-append "\"" input path "\""))
(substitute* "ui-snapshot.c"
@@ -1160,7 +1160,7 @@ (define-public cgit
(quoted-file-name (assoc-ref inputs "xz") "/bin/xz")))
(substitute* "filters/about-formatting.sh"
- (("$\\(dirname $0\\)") (string-append (assoc-ref outputs "out")
+ (("\\$\\(dirname \\$0\\)") (string-append (assoc-ref outputs "out")
"/lib/cgit/filters"))
(("\\| tr") (string-append "| " (which "tr"))))

base-commit: 17e0b03824209ec2dc291d51f42d8c67e13122d6
--
2.41.0
M
M
Maxim Cournoyer wrote on 22 Jan 14:56 +0100
control message for bug #68651
(address . control@debbugs.gnu.org)
87zfwx320p.fsf@gmail.com
close 68651
quit
?