mirror of
https://git.in.rschanz.org/ryan77627/guix.git
synced 2024-12-26 14:28:15 -05:00
gnu: xterm: Fix uxterm in pure environments.
* gnu/packages/xorg.scm (xterm)[arguments]: Add a 'patch-file-names phase.
This commit is contained in:
parent
20d090f435
commit
fcb122b4ed
1 changed files with 13 additions and 1 deletions
|
@ -6087,7 +6087,19 @@ (define-public xterm
|
|||
'(#:configure-flags '("--enable-wide-chars" "--enable-load-vt-fonts"
|
||||
"--enable-i18n" "--enable-doublechars"
|
||||
"--enable-luit" "--enable-mini-luit")
|
||||
#:tests? #f))
|
||||
#:tests? #f ; no test suite
|
||||
#:phases
|
||||
(modify-phases %standard-phases
|
||||
(add-after 'build 'patch-file-names
|
||||
(lambda* (#:key outputs #:allow-other-keys)
|
||||
(let ((out (assoc-ref outputs "out")))
|
||||
(substitute* "uxterm"
|
||||
(("([ `\\|])(sh|sed|awk|xmessage) " _ prefix command)
|
||||
(string-append prefix (which command) " "))
|
||||
(("(`|\"|LANG=C )(locale) " _ prefix command)
|
||||
(string-append prefix (which command) " "))
|
||||
(("=xterm")
|
||||
(string-append "=" out "/bin/xterm")))))))))
|
||||
(native-inputs
|
||||
`(("pkg-config" ,pkg-config)))
|
||||
(inputs
|
||||
|
|
Loading…
Reference in a new issue