recognize aspell

svn: r1341
2005-11-17 21:58:44 +00:00 · 2005-11-17 21:58:44 +00:00 · 816a172e8d
commit 816a172e8d
parent 630824bb58
1 changed files with 5 additions and 1 deletions
--- a/collects/sirmail/spell.ss
+++ b/collects/sirmail/spell.ss
@ -107,7 +107,11 @@
 				 '("/sw/bin/ispell"
 				   "/usr/bin/ispell"
 				   "/bin/ispell"
-				   "/usr/local/bin/ispell")))])
+				   "/usr/local/bin/ispell"))
+			  (find-executable-path (if (eq? (system-type) 'windows)
+						    "aspell.exe"
+						    "aspell")
+						#f))])
        (if (not existing)
            (set! has-ispell? #f)
            (begin