[Emacs-commit] emacs/lisp/mh-e mh-customize.el ChangeLog

[Bill Wohler]

CVSROOT:        /cvsroot/emacs
Module name:    emacs
Branch:         
Changes by:     Bill Wohler <address@hidden>    06/01/09 20:47:55

Modified files:
        lisp/mh-e      : mh-customize.el ChangeLog 

Log message:
        Comment declaration to remind programmer to update forward definition
        if default changes.

CVSWeb URLs:
http://cvs.savannah.gnu.org/viewcvs/emacs/emacs/lisp/mh-e/mh-customize.el.diff?tr1=1.56&tr2=1.57&r1=text&r2=text
http://cvs.savannah.gnu.org/viewcvs/emacs/emacs/lisp/mh-e/ChangeLog.diff?tr1=1.100&tr2=1.101&r1=text&r2=text

Patches:
Index: emacs/lisp/mh-e/ChangeLog
diff -u emacs/lisp/mh-e/ChangeLog:1.100 emacs/lisp/mh-e/ChangeLog:1.101
--- emacs/lisp/mh-e/ChangeLog:1.100     Mon Jan  9 20:15:48 2006
+++ emacs/lisp/mh-e/ChangeLog   Mon Jan  9 20:47:55 2006
@@ -1,5 +1,9 @@
 2006-01-09  Bill Wohler  <address@hidden>
 
+       * mh-customize.el: Use ";; Forward definition." consistently.
+       Comment declaration to remind programmer to update forward
+       definition if default changes.
+
        * mh-funcs.el: 
        * mh-inc.el: 
        * mh-init.el: 
Index: emacs/lisp/mh-e/mh-customize.el
diff -u emacs/lisp/mh-e/mh-customize.el:1.56 
emacs/lisp/mh-e/mh-customize.el:1.57
--- emacs/lisp/mh-e/mh-customize.el:1.56        Mon Jan  9 06:28:49 2006
+++ emacs/lisp/mh-e/mh-customize.el     Mon Jan  9 20:47:55 2006
@@ -1027,7 +1027,8 @@
 
 ;;; Scan Line Formats (:group 'mh-scan-line-formats)
 
-(defvar mh-scan-format-file t) ;forward definition
+;; Forward definition.
+(defvar mh-scan-format-file t)
 
 (defun mh-adaptive-cmd-note-flag-check (symbol value)
   "Check if desired setting is legal.
@@ -1040,7 +1041,8 @@
              "is set to \"Use MH-E scan Format\"")
     (set-default symbol value)))
 
-(defvar mh-adaptive-cmd-note-flag) ;forward definition
+;; Forward definition.
+(defvar mh-adaptive-cmd-note-flag)
 
 (defun mh-scan-format-file-check (symbol value)
   "Check if desired setting is legal.
@@ -1070,6 +1072,7 @@
   :group 'mh-scan-line-formats
   :set 'mh-adaptive-cmd-note-flag-check)
 
+;; Update forward definition above if default changes.
 (defcustom mh-scan-format-file t
   "Specifies the format file to pass to the scan program.
 
@@ -1644,6 +1647,7 @@
          (mh-invisible-headers))
   :group 'mh-show)
 
+;; Update forward definition above if default changes.
 (defcustom mh-invisible-header-fields-default nil
   "*List of hidden header fields.