me/guix
Archived
1
0
Fork 0
Code Activity

gnu: tcsh: Use G-expression.

Browse source 
* gnu/packages/shells.scm (tcsh)[arguments]: Rewrite as gexp.
This commit is contained in:
Marius Bakke 2022-06-30 16:58:20 +02:00
parent bad74c24f0
commit 1a04f8c677
No known key found for this signature in database
GPG key ID: A2A06DF2A33A54FA
1 changed files with 14 additions and 18 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

32
gnu/packages/shells.scm
View file

@ -413,16 +413,16 @@ written by Paul Haahr and Byron Rakitzis.")
(inputs (inputs
(list ncurses)) (list ncurses))
(arguments (arguments
`(#:phases (list
(modify-phases %standard-phases #:phases
,@(if (%current-target-system) #~(modify-phases %standard-phases
'((add-before 'configure 'set-cross-cc #$@(if (%current-target-system)
(lambda _ #~((add-before 'configure 'set-cross-cc
(substitute* "configure" (lambda _
(("CC_FOR_GETHOST=\"cc\"") (substitute* "configure"
"CC_FOR_GETHOST=\"gcc\"")) (("CC_FOR_GETHOST=\"cc\"")
#t))) "CC_FOR_GETHOST=\"gcc\"")))))
'()) #~())
(add-before 'check 'patch-test-scripts (add-before 'check 'patch-test-scripts
(lambda _ (lambda _
;; Take care of pwd ;; Take care of pwd
@ -449,15 +449,11 @@ written by Paul Haahr and Byron Rakitzis.")
;; This file is ISO-8859-1 encoded. ;; This file is ISO-8859-1 encoded.
(with-fluids ((%default-port-encoding #f)) (with-fluids ((%default-port-encoding #f))
(substitute* "tests/testsuite" (substitute* "tests/testsuite"
(("/bin/sh") (which "sh")))) (("/bin/sh") (which "sh"))))))
#t))
(add-after 'install 'post-install (add-after 'install 'post-install
(lambda* (#:key inputs outputs #:allow-other-keys) (lambda _
(let* ((out (assoc-ref %outputs "out")) (with-directory-excursion (string-append #$output "/bin")
(bin (string-append out "/bin"))) (symlink "tcsh" "csh")))))))
(with-directory-excursion bin
(symlink "tcsh" "csh"))
#t))))))
(home-page "https://www.tcsh.org/") (home-page "https://www.tcsh.org/")
(synopsis "Unix shell based on csh") (synopsis "Unix shell based on csh")
(description (description