diff --git a/extra/editors/editpadpro/editpadpro.factor b/extra/editors/editpadpro/editpadpro.factor index b79ac6a594..6882a00e45 100644 --- a/extra/editors/editpadpro/editpadpro.factor +++ b/extra/editors/editpadpro/editpadpro.factor @@ -1,8 +1,15 @@ USING: definitions kernel parser words sequences math.parser -namespaces editors io.launcher ; +namespaces editors io.launcher windows.shell32 io.files +strings ; IN: editors.editpadpro +: editpadpro-path + \ editpadpro-path get-global [ + program-files "JGsoft" path+ walk-dir + [ >lower "editpadpro.exe" tail? ] find nip + ] unless* ; + : editpadpro ( file line -- ) - [ "editpadpro.exe /l" % # " \"" % % "\"" % ] "" make run-process ; + [ editpadpro-path % " /l" % # " \"" % % "\"" % ] "" make run-detached ; [ editpadpro ] edit-hook set-global