better default scite path

2008-12-04 13:53:03 -06:00 · 2008-12-04 13:53:03 -06:00 · f5bafbb2a9
parent 9172a3ae27
commit f5bafbb2a9
1 changed files with 4 additions and 1 deletions
--- a/basis/editors/scite/scite.factor
+++ b/basis/editors/scite/scite.factor
@ -14,7 +14,10 @@ IN: editors.scite

 : scite-path ( -- path )
    \ scite-path get-global [
-        program-files "wscite\\SciTE.exe" append-path
+        program-files "ScITE Source Code Editor\\SciTE.exe" append-path
+        dup exists? [
+            drop program-files "wscite\\SciTE.exe" append-path
+        ] unless
    ] unless* ;

 : scite-command ( file line -- cmd )