diff --git a/scheme/install-lib/install-lib.scm b/scheme/install-lib/install-lib.scm index 7f383d0..1e5b849 100755 --- a/scheme/install-lib/install-lib.scm +++ b/scheme/install-lib/install-lib.scm @@ -1,5 +1,5 @@ ;;; 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 ;; - think about --host: does it make sense? @@ -817,7 +817,9 @@ END "The following scsh package" (if (many? packages) "s were" " was") " installed successfully:\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 (as-string "To make sure scsh finds "(if (many? packages) "them" "it")", "