1
0
mirror of https://git.savannah.gnu.org/git/emacs.git synced 2024-12-11 09:20:51 +00:00

* lisp/newcomment.el (comment-inline-offset): New custom var.

(comment-indent): Use it.

Fixes: debbugs:11090
This commit is contained in:
Philipp Haselwarter 2012-03-25 14:37:24 -04:00 committed by Stefan Monnier
parent 3f99e6e686
commit 8eb5d48f36
2 changed files with 19 additions and 1 deletions

View File

@ -1,3 +1,8 @@
2012-03-25 Philipp Haselwarter <philipp.haselwarter@gmx.de> (tiny change)
* newcomment.el (comment-inline-offset): New custom var (bug#11090).
(comment-indent): Use it.
2012-02-15 Stefan Monnier <monnier@iro.umontreal.ca>
* emacs-lisp/smie.el: Provide smarter auto-filling.

View File

@ -268,6 +268,19 @@ makes the comment easier to read. Default is 1. nil means 0."
:type '(choice string integer (const nil))
:group 'comment)
;;;###autoload
(defcustom comment-inline-offset 1
"Inline comments have to be preceded by at least this many spaces.
This is usefull when style-conventions require a certain minimal offset.
Python's PEP8 for example recommends two spaces, so you could do:
\(add-hook 'python-mode-hook
(lambda nil (set (make-local-variable 'comment-inline-offset) 2)))
See `comment-padding' for whole-line comments."
:type 'integer
:group 'comment)
;;;###autoload
(defcustom comment-multi-line nil
"Non-nil means `comment-indent-new-line' continues comments.
@ -685,7 +698,7 @@ If CONTINUE is non-nil, use the `comment-continue' markers if any."
(save-excursion
(skip-chars-backward " \t")
(unless (bolp)
(setq indent (max indent (1+ (current-column))))))
(setq indent (max indent (+ (current-column) comment-inline-offset)))))
;; If that's different from comment's current position, change it.
(unless (= (current-column) indent)
(delete-region (point) (progn (skip-chars-backward " \t") (point)))