- be slightly smarter when checking whether setting SCSH_LIB_DIRS is
required or not (although the current trick doesn't work with --dest-dir, but that's a minor detail)
This commit is contained in:
parent
19197a7aca
commit
307a5966c8
|
@ -1,5 +1,5 @@
|
||||||
;;; Installation library for scsh modules.
|
;;; Installation library for scsh modules.
|
||||||
;;; $Id: install-lib.scm,v 1.14 2004/03/31 19:44:54 michel-schinz Exp $
|
;;; $Id: install-lib.scm,v 1.15 2004/04/01 18:36:43 michel-schinz Exp $
|
||||||
|
|
||||||
;; TODO
|
;; TODO
|
||||||
;; - think about --host: does it make sense?
|
;; - think about --host: does it make sense?
|
||||||
|
@ -817,7 +817,9 @@ END
|
||||||
"The following scsh package" (if (many? packages) "s were" " was")
|
"The following scsh package" (if (many? packages) "s were" " was")
|
||||||
" installed successfully:\n"
|
" installed successfully:\n"
|
||||||
" "(string-join (map package-full-name packages) ", ")"\n"))
|
" "(string-join (map package-full-name packages) ", ")"\n"))
|
||||||
(if (not (find-library-file (first load-scripts) (lib-dirs) ""))
|
(if (not (every (lambda (script)
|
||||||
|
(find-library-file script (lib-dirs) ""))
|
||||||
|
load-scripts))
|
||||||
(display
|
(display
|
||||||
(as-string
|
(as-string
|
||||||
"To make sure scsh finds "(if (many? packages) "them" "it")", "
|
"To make sure scsh finds "(if (many? packages) "them" "it")", "
|
||||||
|
|
Loading…
Reference in New Issue