ted-notepad autopath
parent
3277b67b50
commit
9cbd4a61d5
|
@ -1,9 +1,15 @@
|
|||
USING: editors io.launcher kernel math.parser namespaces ;
|
||||
USING: editors io.files io.launcher kernel math.parser
|
||||
namespaces sequences windows.shell32 ;
|
||||
IN: editors.ted-notepad
|
||||
|
||||
: ted-notepad-path
|
||||
\ ted-notepad-path get-global [
|
||||
program-files "\\TED Notepad\\TedNPad.exe" path+
|
||||
] unless* ;
|
||||
|
||||
: ted-notepad ( file line -- )
|
||||
[
|
||||
\ ted-notepad get-global % " /l" % #
|
||||
ted-notepad-path % " /l" % #
|
||||
" " % %
|
||||
] "" make run-detached ;
|
||||
|
||||
|
|
Loading…
Reference in New Issue