1 USING: editors hardware-info.windows io.launcher kernel
2 math.parser namespaces sequences windows.shell32 io.files
6 : wordpad-path ( -- path )
8 program-files "Windows NT\\Accessories\\wordpad.exe" append-path
11 : wordpad ( file line -- )
12 drop wordpad-path swap 2array dup . run-detached drop ;
14 [ wordpad ] edit-hook set-global