diff options
author | dos-reis <gdr@axiomatics.org> | 2008-04-24 10:14:50 +0000 |
---|---|---|
committer | dos-reis <gdr@axiomatics.org> | 2008-04-24 10:14:50 +0000 |
commit | fe07321807b8be45945bd445abd7d93ad9c8f513 (patch) | |
tree | 609517c78061a0ad5a370902a6a7357852037db9 /src/interp/i-syscmd.boot | |
parent | 695a6c656681918abe4b20e04470dd266b4f6bbe (diff) | |
download | open-axiom-fe07321807b8be45945bd445abd7d93ad9c8f513.tar.gz |
Remove duplicate junk.
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 |