--- flyspell.el.orig	2006-09-14 14:57:12.000000000 +0200
+++ flyspell.el	2006-09-14 14:57:26.000000000 +0200
@@ -556,7 +556,7 @@
 ;;*---------------------------------------------------------------------*/
 (defun flyspell-mode-on ()
   "Turn Flyspell mode on.  Do not use this; use `flyspell-mode' instead."
-  (ispell-maybe-find-aspell-dictionaries)
+  (ispell-initialize-program-params)
   (setq ispell-highlight-face 'flyspell-incorrect)
   ;; local dictionaries setup
   (or ispell-local-dictionary ispell-dictionary
@@ -1476,7 +1476,7 @@
     ;; this is done, we can start checking...
     (if flyspell-issue-message-flag (message "Checking region..."))
     (set-buffer curbuf)
-    (ispell-check-version)
+    (ispell-initialize-program-params)
     (let ((c (apply 'call-process-region beg
 		    end
 		    ispell-program-name