1 USING: editors io.standard-paths kernel make math.parser
6 ultraedit editor-class set-global
8 : ultraedit-path ( -- path )
9 \ ultraedit-path get-global [
10 { "IDM Computer Solutions" } "uedit32.exe" find-in-applications
11 [ "uedit32.exe" ] unless*
14 M: ultraedit editor-command ( file line -- command )
16 ultraedit-path , [ swap % "/" % # "/1" % ] "" make ,