--- a/.emacs-autogen.sh	Sun Apr 25 23:09:13 2010 +0300
+++ b/.emacs-autogen.sh	Mon Apr 26 17:04:33 2010 +0300
@@ -11,4 +11,8 @@
   echo >>$cfg
   echo "(setq-default ispell-program-name \"aspell\")" >>$cfg
   echo "(setq-default ispell-local-dictionary \"english\")" >>$cfg
+elif which ispell; then
+  echo >>$cfg
+  echo "(setq-default ispell-program-name \"ispell\")" >>$cfg
+  echo "(setq-default ispell-local-dictionary \"english\")" >>$cfg
 fi

--- a/.emacs-my	Sun Apr 25 23:09:13 2010 +0300
+++ b/.emacs-my	Mon Apr 26 17:04:33 2010 +0300
@@ -651,23 +651,12 @@
   )
 
 ;; ======================================================================
-;; spell, ispall, aspell.
+;; spell, ispell, aspell.
 
-(setq ispell-program-name "ispell")
-;(setq ispell-dictionary "russianw"); default dictionary
-;(setq ispell-local-dictionary "russianw"); default dictionary
+;; Settings for spelling done in '.emacs-autogen'.
 ;(add-hook 'text-mode-hook 'flyspell-mode)
 ;(setq flyspell-default-dictionary "russianw")
 ;(setq flyspell-delay '1)
-;; (setq ispell-local-dictionary-alist
-;;   '((nil             ; default (english.aff)
-;;      "[A-Za-z]" "[^A-Za-z]" "[']" nil ("-B") nil iso-8859-1)
-;;     ("UK-xlg"                ; english large version
-;;      "[A-Za-z]" "[^A-Za-z]" "[']" nil ("-B" "-d" "UK-xlg") nil iso-8859-1)
-;;     ("US-xlg"                ; american large version
-;;      "[A-Za-z]" "[^A-Za-z]" "[']" nil ("-B" "-d" "US-xlg") nil iso-8859-1)
-;;    )
-;; )
 
 ;; ======================================================================
 ;; GTD, PIM, organize, todo mode.