diff options
Diffstat (limited to 'src/interp/i-syscmd.boot')
-rw-r--r-- | src/interp/i-syscmd.boot | 4 |
1 files changed, 1 insertions, 3 deletions
diff --git a/src/interp/i-syscmd.boot b/src/interp/i-syscmd.boot index b3f2433f..00ef8fe6 100644 --- a/src/interp/i-syscmd.boot +++ b/src/interp/i-syscmd.boot @@ -315,7 +315,7 @@ clearCmdAll() == resetInCoreHist() if $useInternalHistoryTable then $internalHistoryTable := NIL - else deleteFile histFileName() + else removeFile histFileName() $IOindex := 1 updateCurrentInterpreterFrame() $currentLine := '")clear all" --restored 3/94; needed for undo (RDJ) @@ -1340,8 +1340,6 @@ changeToNamedInterpreterFrame(name) == $interpreterFrameRing := [frame,:NREMOVE($interpreterFrameRing, frame)] updateFromCurrentInterpreterFrame() -makeInitialModemapFrame() == COPY $InitialModemapFrame - findFrameInRing(name) == val := NIL for frame in $interpreterFrameRing repeat |