Paste: etexteditor

Author: erg
Mode: factor
Date: Thu, 13 Nov 2008 22:24:13
Plain Text |
! Copyright (C) 2008 Kibleur Christophe.
! See http://factorcode.org/license.txt for BSD license.
USING: editors io.files io.launcher kernel math.parser
namespaces sequences windows.shell32 make ;
IN: editors.etexteditor

: etexteditor-path ( -- str )
    \ etexteditor-path get-global [
        program-files "e\\e.exe" append-path
    ] unless* ;

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

[ etexteditor ] edit-hook set-global

New Annotation

Summary:
Author:
Mode:
Body: