2008-04-02 16:11:11 -04:00
|
|
|
! Copyright (C) 2008 Ben Schlingelhof.
|
|
|
|
|
! See http://factorcode.org/license.txt for BSD license.
|
|
|
|
|
USING: definitions io.launcher kernel parser words sequences
|
2008-09-12 11:36:00 -04:00
|
|
|
math math.parser namespaces editors make ;
|
2008-04-02 16:11:11 -04:00
|
|
|
IN: editors.textwrangler
|
|
|
|
|
|
|
|
|
|
: tw ( file line -- )
|
|
|
|
|
[ "edit +" % # " " % % ] "" make run-process drop ;
|
|
|
|
|
|
|
|
|
|
: tw-word ( word -- )
|
|
|
|
|
where first2 tw ;
|
|
|
|
|
|
|
|
|
|
[ tw ] edit-hook set-global
|
