Fix bug where shell commands were ignored, introduced by #71

This commit is contained in:
John J. Camilleri
2020-09-18 09:25:08 +02:00
parent 6c54e5b63c
commit ab52572f44

View File

@@ -134,8 +134,7 @@ execute1' s0 =
"dt":ws -> define_tree ws
-- ordinary commands
_ -> do env <- gets commandenv
-- () env s0
-- interpretCommandLine env s0
interpretCommandLine env s0
continue
where
continue,stop :: ShellM Bool