Skip to content
GitLab
Projects
Groups
Snippets
Help
Loading...
Help
Help
Support
Community forum
Keyboard shortcuts
?
Submit feedback
Contribute to GitLab
Sign in / Register
Toggle navigation
Open sidebar
emacs
emacs
Commits
28be5ce7
Commit
28be5ce7
authored
May 07, 2012
by
Stefan Monnier
Browse files
* loadup.el: Preload newcomment.el.
* newcomment.el: Move autoload-only code to toplevel.
parent
d13c8be6
Changes
3
Hide whitespace changes
Inline
Side-by-side
Showing
3 changed files
with
14 additions
and
5 deletions
+14
-5
lisp/ChangeLog
lisp/ChangeLog
+3
-0
lisp/loadup.el
lisp/loadup.el
+1
-0
lisp/newcomment.el
lisp/newcomment.el
+10
-5
No files found.
lisp/ChangeLog
View file @
28be5ce7
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.
...
...
lisp/loadup.el
View file @
28be5ce7
...
...
@@ -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"
)
...
...
lisp/newcomment.el
View file @
28be5ce7
...
...
@@ -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
...
...
Write
Preview
Markdown
is supported
0%
Try again
or
attach a new file
.
Attach a file
Cancel
You are about to add
0
people
to the discussion. Proceed with caution.
Finish editing this message first!
Cancel
Please
register
or
sign in
to comment