diff options
Diffstat (limited to 'src/interp/compat.boot')
-rw-r--r-- | src/interp/compat.boot | 7 |
1 files changed, 1 insertions, 6 deletions
diff --git a/src/interp/compat.boot b/src/interp/compat.boot index b5082786..c5a77c23 100644 --- a/src/interp/compat.boot +++ b/src/interp/compat.boot @@ -57,12 +57,7 @@ system() == terminateSystemCommand() editFile file == - editProg := - %hasFeature KEYWORD::WIN32 => '"notepad" - prog := getEnv '"EDITOR" => prog - # $EditorProgram ^= 0 => $EditorProgram - return nil -- FIXME: Should we not notify user? - runCommand STRCONC(editProg,'" ",namestring pathname file) + runCommand strconc(textEditor(),'" ",namestring pathname file) makeBigFloat(mantissa,expon) == [$BFtag,mantissa,:expon] |