Actually let the user pick an editor after editor protocol change.

db4
Doug Coleman 2011-11-02 13:41:46 -07:00
parent 6ac8478d80
commit 86e3817e40
1 changed files with 5 additions and 0 deletions
basis/editors

View File

@ -19,6 +19,11 @@ SYMBOL: editor-class
[ [ "Load " prepend ] keep ] { } map>assoc ;
HOOK: editor-command editor-class ( file line -- command )
M: f editor-command
"Select an editor" editor-restarts throw-restarts require
editor-command ;
HOOK: editor-detached? editor-class ( -- ? )
M: object editor-detached? t ;