procyberian/emacs
2
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

* loadup.el: Preload newcomment.el.

Browse source 
* newcomment.el: Move autoload-only code to toplevel.
This commit is contained in:
Stefan Monnier 2012-05-07 16:48:41 -04:00
parent d13c8be67c
commit 28be5ce7b0
3 changed files with 14 additions and 5 deletions
Download patch file Download diff file Expand all files Collapse all files

3
lisp/ChangeLog
View file

@ -1,5 +1,8 @@
2012-05-07 Stefan Monnier <monnier@iro.umontreal.ca>
* 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.

1
lisp/loadup.el
View file

@ -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")

15
lisp/newcomment.el
View file

@ -102,30 +102,35 @@ Comments might be indented to a different value in order not to go beyond
: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