Comment declaration to remind programmer to update forward definition

if default changes.

diff --git a/lisp/mh-e/ChangeLog b/lisp/mh-e/ChangeLog
index 7ec0541fcefa4c78abf7668f51b2ee61613143bf..af9616ecd33dc52bd72ce3cc267e2625d331a386 100644 (file)
--- a/lisp/mh-e/ChangeLog
+++ b/lisp/mh-e/ChangeLog
@@ -1,5 +1,9 @@
 2006-01-09  Bill Wohler  <wohler@newt.com>
 
+       * 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: 

diff --git a/lisp/mh-e/mh-customize.el b/lisp/mh-e/mh-customize.el
index fc39089b43cdb9274e6c71fa094fd2978ed86f79..8f7d508f1e60f1bc6d5b49cd23d02ea1ddf41a23 100644 (file)
--- a/lisp/mh-e/mh-customize.el
+++ b/lisp/mh-e/mh-customize.el
@@ -1027,7 +1027,8 @@ message 200, then use the range \"200:200\"."
 
 ;;; 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 @@ Otherwise, set SYMBOL to VALUE."
              "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 @@ you would use \"(mh-set-cmd-note 4)\"."
   :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 @@ See also `mh-clean-message-header-flag'."
          (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.