factor/basis/editors/textedit/textedit.factor

USING: definitions io.launcher kernel math math.parser parser
namespaces prettyprint editors make ;
IN: editors.textedit

: textedit ( file line -- )
    drop
    [ "open" , "-a" , "TextEdit", , ] { } make
    run-detached drop ;

[ textedit ] edit-hook set-global
Adding support for TextEdit. 2008-09-11 21:15:59 -04:00			`USING: definitions io.launcher kernel math math.parser parser`
			`namespaces prettyprint editors make ;`
			`IN: editors.textedit`

launch editors with run-detached. the naming convention foo-location doesn't make sense with some text editors, so rename the edit words to the text editor name 2009-05-15 17:12:13 -04:00			`: textedit ( file line -- )`
Adding support for TextEdit. 2008-09-11 21:15:59 -04:00			`drop`
			`[ "open" , "-a" , "TextEdit", , ] { } make`
launch editors with run-detached. the naming convention foo-location doesn't make sense with some text editors, so rename the edit words to the text editor name 2009-05-15 17:12:13 -04:00			`run-detached drop ;`
Adding support for TextEdit. 2008-09-11 21:15:59 -04:00
launch editors with run-detached. the naming convention foo-location doesn't make sense with some text editors, so rename the edit words to the text editor name 2009-05-15 17:12:13 -04:00			`[ textedit ] edit-hook set-global`