editpadlite-path ( -- path )

Vocabulary

editors.editpadlite

Inputs

None

Outputs

path

an object

Definition

USING: combinators.short-circuit io.standard-paths kernel
namespaces ;

IN: editors.editpadlite

: editpadlite-path ( -- path )
    \ editpadlite-path get [
        {
            [
                { "Just Great Software" "JGsoft" }
                "editpadlite.exe" find-in-applications
            ]
            [
                { "Just Great Software" "JGsoft" }
                "editpadlite7.exe" find-in-applications
            ]
            [ "editpadlite7.exe" ]
        } 0||
    ] unless* ;