Sat 02 Aug 2003 01:19:46 PM UTC, comment #1:
Fixed with patch:
--- src/interp/i-toplev.boot.pamphlet.orig Thu Jul 31 23:27:32 2003
+++ src/interp/i-toplev.boot.pamphlet Sat Aug 2 15:15:48 2003
@@ -79,12 +79,12 @@
SETQ($CURRENT_-DIRECTORY,_DEFAULT_-PATHNAME_-DEFAULTS_)
if null(l) then
if $displayStartMsgs then
- sayKeyedMsg("S2IZ0053",[namestring ['axiom,'input]])
+ sayKeyedMsg("S2IZ0053",[namestring ['_.axiom,'input]])
readSpadProfileIfThere()
if $displayStartMsgs then spadStartUpMsgs()
if $OLDLINE then
SAY fillerSpaces($LINELENGTH,'"=")
- sayKeyedMsg("S2IZ0050",[namestring ['axiom,'input]])
+ sayKeyedMsg("S2IZ0050",[namestring ['_.axiom,'input]])
if $OLDLINE ^= 'END__UNIT
then
centerAndHighlight($OLDLINE,$LINELENGTH,'" ")
@@ -99,7 +99,7 @@
readSpadProfileIfThere() ==
-- reads SPADPROF INPUT if it exists
- file := ['axiom,'input]
+ file := ['_.axiom,'input]
MAKE_-INPUT_-FILENAME file =>
SETQ(_/EDITFILE,file)
_/RQ ()
|