1 USING: editors io.files io.launcher kernel math.parser
2 namespaces sequences io.paths.windows make ;
3 IN: editors.ted-notepad
5 : ted-notepad-path ( -- path )
6 \ ted-notepad-path get-global [
7 "TED Notepad" t [ "TedNPad.exe" tail? ] find-in-program-files
10 : ted-notepad ( file line -- )
13 number>string "/l" prepend , ,
14 ] { } make run-detached drop ;
16 [ ted-notepad ] edit-hook set-global