(all): Use correct group name for members of mode-line group.

2 files changed, 6 insertions, 3 deletions

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 5998b697a85..d07e5984d29 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,5 +1,8 @@
 2007-12-19  Martin Rudalics  <rudalics@gmx.at>
 
+        * cus-start.el (all): Use correct group name for members of
+        mode-line group.
+
         * man.el (Man-default-man-entry): When looking for default man
         entry title search text preceding point.  Use when instead of if.
 
diff --git a/lisp/cus-start.el b/lisp/cus-start.el
index fd5a62f0c1b..fda7b356774 100644
--- a/lisp/cus-start.el
+++ b/lisp/cus-start.el
@@ -39,7 +39,7 @@
              (gc-cons-threshold alloc integer)
              (garbage-collection-messages alloc boolean)
              ;; buffer.c
-             (mode-line-format modeline sexp) ;Hard to do right.
+             (mode-line-format mode-line sexp) ;Hard to do right.
              (default-major-mode internal function)
              (enable-multibyte-characters mule boolean)
              (case-fold-search matching boolean)
@@ -364,8 +364,8 @@ since it could result in memory overflow and make Emacs crash."
              (hscroll-margin windows integer "22.1")
              (hscroll-step windows number "22.1")
              (truncate-partial-width-windows display boolean)
-             (mode-line-inverse-video modeline boolean)
-             (mode-line-in-non-selected-windows modeline boolean "22.1")
+             (mode-line-inverse-video mode-line boolean)
+             (mode-line-in-non-selected-windows mode-line boolean "22.1")
              (line-number-display-limit display
                                         (choice integer
                                                 (const :tag "No limit" nil)))