diff --git a/run-medley b/run-medley index 9ab722e2..5a2b7c74 100755 --- a/run-medley +++ b/run-medley @@ -54,7 +54,12 @@ export LDEKBDTYPE=x while [ "$#" -ne 0 ]; do case "$1" in "-nogreet" | "--nogreet") - export LDEINIT="" + # Keep (GREET) from finding an init file + mkdir -p $MEDLEYDIR/tmp/logindir + export HOME=$MEDLEYDIR/tmp/logindir + export LOGINDIR=$MEDLEYDIR/tmp/logindir + + export LDEINIT="$MEDLEYDIR/greetfiles/NOGREET" ;; "-greet" | "--greet") export LDEINIT="$2" diff --git a/scripts/loadup-all.sh b/scripts/loadup-all.sh index 3e00d861..5db56ab4 100755 --- a/scripts/loadup-all.sh +++ b/scripts/loadup-all.sh @@ -7,10 +7,6 @@ if [ ! -x run-medley ] ; then exit 1 fi -# set timestamp -mkdir -p ./tmp -touch ./tmp/loadup.timestamp - ./scripts/loadup-init.sh && \ ./scripts/loadup-mid-from-init.sh && \ ./scripts/loadup-lisp-from-mid.sh && \ diff --git a/scripts/loadup-aux.sh b/scripts/loadup-aux.sh index a1c86b6e..9dd58574 100755 --- a/scripts/loadup-aux.sh +++ b/scripts/loadup-aux.sh @@ -9,6 +9,11 @@ fi touch tmp/loadup.timestamp +# Keep (GREET) from finding an init file +mkdir -p $MEDLEYDIR/tmp/logindir +export HOME=$MEDLEYDIR/tmp/logindir +export LOGINDIR=$MEDLEYDIR/tmp/logindir + scr="-sc 1024x768 -g 1042x790" echo '" (IL:MEDLEY-INIT-VARS)(IL:LOAD(QUOTE MEDLEY-UTILS))(IL:MAKE-EXPORTS-ALL)(IL:MAKE-WHEREIS-HASH)(IL:LOGOUT T)"' > tmp/loadup-aux.cm diff --git a/scripts/loadup-full-from-lisp.sh b/scripts/loadup-full-from-lisp.sh index 6e54b97b..47d12cc7 100755 --- a/scripts/loadup-full-from-lisp.sh +++ b/scripts/loadup-full-from-lisp.sh @@ -10,6 +10,11 @@ scr="-sc 1024x768 -g 1042x790" touch tmp/loadup.timestamp +# Keep (GREET) from finding an init file +mkdir -p $MEDLEYDIR/tmp/logindir +export HOME=$MEDLEYDIR/tmp/logindir +export LOGINDIR=$MEDLEYDIR/tmp/logindir + ./run-medley $scr -greet "$MEDLEYDIR/sources/LOADUP-FULL.CM" "$MEDLEYDIR/tmp/lisp.sysout" if [ tmp/full.sysout -nt tmp/loadup.timestamp ]; then diff --git a/scripts/loadup-full.sh b/scripts/loadup-full.sh index c9c8da07..db136c55 100755 --- a/scripts/loadup-full.sh +++ b/scripts/loadup-full.sh @@ -6,6 +6,12 @@ if [ ! -x run-medley ] ; then echo must run from MEDLEYDIR ; exit 1 ; fi + +# Keep (GREET) from finding an init file +mkdir -p $MEDLEYDIR/tmp/logindir +export HOME=$MEDLEYDIR/tmp/logindir +export LOGINDIR=$MEDLEYDIR/tmp/logindir + scr="-sc 1024x768 -g 1042x790" touch tmp/loadup.timestamp diff --git a/scripts/loadup-init.sh b/scripts/loadup-init.sh index 1d6c1483..524c51a1 100755 --- a/scripts/loadup-init.sh +++ b/scripts/loadup-init.sh @@ -9,7 +9,11 @@ fi scr="-sc 1024x768 -g 1042x790" -mkdir -p "$MEDLEYDIR/tmp" +# Keep (GREET) from finding an init file +mkdir -p $MEDLEYDIR/tmp/logindir +export HOME=$MEDLEYDIR/tmp/logindir +export LOGINDIR=$MEDLEYDIR/tmp/logindir + touch tmp/loadup.timestamp ./run-medley $scr -greet "$MEDLEYDIR"/sources/LOADUP-INIT.LISP loadups/starter.sysout