basis/editors/notepadpp/notepadpp.factor

   1 USING: editors io.files io.launcher kernel math.parser
   2 namespaces sequences windows.shell32 make ;
   3 IN: editors.notepadpp
   4
   5 : notepadpp-path
   6     \ notepadpp-path get-global [
   7         program-files "notepad++\\notepad++.exe" append-path
   8     ] unless* ;
   9
  10 : notepadpp ( file line -- )
  11     [
  12         notepadpp-path ,
  13         "-n" swap number>string append , ,
  14     ] { } make run-detached drop ;
  15
  16 [ notepadpp ] edit-hook set-global