--- a/.emacs-autogen.sh	Wed Sep 07 14:10:42 2011 +0300
+++ b/.emacs-autogen.sh	Wed Sep 07 14:22:15 2011 +0300
@@ -34,6 +34,13 @@
   esac
 }
 
+print_header() {
+  echo
+  echo ';; ================================================================'
+  echo ";; ${FUNCNAME[1]}."
+  echo
+}
+
 check_ispell() {
   command -v ispell >/dev/null && return 0 || return 1
 }
@@ -59,11 +66,8 @@
   echo '(setq-default ispell-local-dictionary "en")'
 }
 
-check_speller() {
-  echo
-  echo ';; ================================================================'
-  echo ';; Speller settings (check_speller).'
-  echo
+print_speller() {
+  print_header
   check_ispell
   ispell_present=$?
   check_aspell
@@ -116,6 +120,6 @@
 " >$cfg
 
 check_platform
-check_speller >>$cfg
 print_speller >>$cfg
+print_man >>$cfg