factor/extra/editors/editplus/editplus.factor

USING: editors io.files io.launcher kernel math.parser
namespaces sequences windows.shell32 ;
IN: editors.editplus

: editplus-path ( -- path )
    \ editplus-path get-global [
        program-files "\\EditPlus 2\\editplus.exe" path+
    ] unless* ;

: editplus ( file line -- )
    [
        editplus-path , "-cursor" , number>string , ,
    ] { } make run-detached drop ;

[ editplus ] edit-hook set-global
EditPlus automatically detects path 2007-12-09 11:48:01 -05:00			`USING: editors io.files io.launcher kernel math.parser`
			`namespaces sequences windows.shell32 ;`
Add edit-hook for EditPlus editor support 2007-12-04 01:05:41 -05:00			`IN: editors.editplus`

EditPlus automatically detects path 2007-12-09 11:48:01 -05:00			`: editplus-path ( -- path )`
			`\ editplus-path get-global [`
change append to path+ use find-file-breadth fix load errors 2008-02-12 13:14:57 -05:00			`program-files "\\EditPlus 2\\editplus.exe" path+`
EditPlus automatically detects path 2007-12-09 11:48:01 -05:00			`] unless* ;`

Add edit-hook for EditPlus editor support 2007-12-04 01:05:41 -05:00			`: editplus ( file line -- )`
			`[`
Updating extra/ for launcher changes 2008-01-24 02:50:40 -05:00			`editplus-path , "-cursor" , number>string , ,`
			`] { } make run-detached drop ;`
Add edit-hook for EditPlus editor support 2007-12-04 01:05:41 -05:00
			`[ editplus ] edit-hook set-global`