1
0
mirror of synced 2026-01-13 15:37:38 +00:00
Interlisp.medley/scripts/loadup-init.sh
2021-09-13 05:54:31 -07:00

31 lines
606 B
Bash
Executable File

#!/bin/sh
export MEDLEYDIR=`pwd`
if [ ! -f run-medley ] ; then
echo run from MEDLEYDIR
exit 1
fi
scr="-sc 1024x768 -g 1042x790"
# 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 -loadup "$MEDLEYDIR"/sources/LOADUP-INIT.LISP loadups/starter.sysout
if [ tmp/init.dlinit -nt tmp/loadup.timestamp ]; then
echo ---- made ----
ls -l tmp/init.* tmp/RDSYS* tmp/I-NEW*
echo --------------
else
echo XXXXX FAILURE XXXXX
exit 1
fi