[Emacs-diffs] /srv/bzr/emacs/trunk r108149: * loadup.el: Preload newcomment.el.

[Stefan Monnier]

------------------------------------------------------------
revno: 108149
committer: Stefan Monnier <address@hidden>
branch nick: trunk
timestamp: Mon 2012-05-07 16:48:41 -0400
message:
  * loadup.el: Preload newcomment.el.
  * newcomment.el: Move autoload-only code to toplevel.
modified:
  lisp/ChangeLog
  lisp/loadup.el
  lisp/newcomment.el

=== modified file 'lisp/ChangeLog'
--- a/lisp/ChangeLog    2012-05-07 16:29:55 +0000
+++ b/lisp/ChangeLog    2012-05-07 20:48:41 +0000
@@ -1,5 +1,8 @@
 2012-05-07  Stefan Monnier  <address@hidden>
 
+       * loadup.el: Preload newcomment.el.
+       * newcomment.el: Move autoload-only code to toplevel.
+
        * buff-menu.el (list-buffers--refresh): Mark `size' as right-align.
        * emacs-lisp/tabulated-list.el (tabulated-list-init-header):
        Handle new :right-align column property.

=== modified file 'lisp/loadup.el'
--- a/lisp/loadup.el    2012-05-06 16:45:46 +0000
+++ b/lisp/loadup.el    2012-05-07 20:48:41 +0000
@@ -186,6 +186,7 @@
 (load "emacs-lisp/lisp-mode")
 (load "textmodes/text-mode")
 (load "textmodes/fill")
+(load "newcomment")
 
 (load "replace")
 (load "emacs-lisp/tabulated-list")

=== modified file 'lisp/newcomment.el'
--- a/lisp/newcomment.el        2012-04-17 03:06:56 +0000
+++ b/lisp/newcomment.el        2012-05-07 20:48:41 +0000
@@ -102,30 +102,35 @@
   :type 'integer
   :group 'comment)
 (make-variable-buffer-local 'comment-column)
-;;;###autoload(put 'comment-column 'safe-local-variable 'integerp)
+;;;###autoload
+(put 'comment-column 'safe-local-variable 'integerp)
 
 ;;;###autoload
 (defvar comment-start nil
   "String to insert to start a new comment, or nil if no comment syntax.")
-;;;###autoload(put 'comment-start 'safe-local-variable 'string-or-null-p)
+;;;###autoload
+(put 'comment-start 'safe-local-variable 'string-or-null-p)
 
 ;;;###autoload
 (defvar comment-start-skip nil
   "Regexp to match the start of a comment plus everything up to its body.
 If there are any \\(...\\) pairs, the comment delimiter text is held to begin
 at the place matched by the close of the first pair.")
-;;;###autoload(put 'comment-start-skip 'safe-local-variable 'string-or-null-p)
+;;;###autoload
+(put 'comment-start-skip 'safe-local-variable 'string-or-null-p)
 
 ;;;###autoload
 (defvar comment-end-skip nil
   "Regexp to match the end of a comment plus everything back to its body.")
-;;;###autoload(put 'comment-end-skip 'safe-local-variable 'string-or-null-p)
+;;;###autoload
+(put 'comment-end-skip 'safe-local-variable 'string-or-null-p)
 
 ;;;###autoload
 (defvar comment-end (purecopy "")
   "String to insert to end a new comment.
 Should be an empty string if comments are terminated by end-of-line.")
-;;;###autoload(put 'comment-end 'safe-local-variable 'string-or-null-p)
+;;;###autoload
+(put 'comment-end 'safe-local-variable 'string-or-null-p)
 
 ;;;###autoload
 (defvar comment-indent-function 'comment-indent-default