find-textadept-path ( -- path )

Vocabulary

editors.textadept

Inputs

None

Outputs

path

an object

Definition

USING: system ;

IN: editors.textadept

HOOK: find-textadept-path os ( -- path )

Methods

USING: editors.textadept io.pathnames io.standard-paths kernel
system ;

M: macos find-textadept-path
    "com.textadept" find-native-bundle
    [ "Contents/MacOS/textadept" append-path ] [ f ] if* ;


USING: editors.textadept kernel ;

M: object find-textadept-path f ;


USING: editors.textadept io.standard-paths kernel system ;

M: windows find-textadept-path
    { "textadept_6.5.win32" } "textadept.exe"
    find-in-applications [ "textadept.exe" ] unless* ;