basis/editors/textedit/textedit.factor

   1 USING: definitions io.launcher kernel math math.parser parser
   2 namespaces prettyprint editors make ;
   3 IN: editors.textedit
   4
   5 : textedit-location ( file line -- )
   6     drop
   7     [ "open" , "-a" , "TextEdit", , ] { } make
   8     try-process ;
   9
  10 [ textedit-location ] edit-hook set-global