distro: tcl: Make a `tclsh' symlink.

* gnu/packages/tcl.scm (tcl): Add a `tclsh' symlink.
master
Ludovic Courtès 2013-01-18 18:22:48 +01:00
parent 5fc5c2f340
commit 3465eb03bd
1 changed files with 10 additions and 2 deletions

View File

@ -42,9 +42,17 @@
(chdir "unix"))
(alist-cons-after
'install 'install-private-headers
(lambda _
(lambda* (#:key outputs #:allow-other-keys)
;; Private headers are needed by Expect.
(zero? (system* "make" "install-private-headers")))
(and (zero? (system* "make"
"install-private-headers"))
(let ((bin (string-append (assoc-ref outputs "out")
"/bin")))
;; Create a tclsh -> tclsh8.6 symlink.
;; Programs such as Ghostscript rely on it.
(with-directory-excursion bin
(symlink (car (find-files "." "tclsh"))
"tclsh")))))
%standard-phases))
;; XXX: There are a few test failures (related to HTTP, most