diff options
| author | Lars Ingebrigtsen | 2021-01-28 07:09:18 +0100 |
|---|---|---|
| committer | Lars Ingebrigtsen | 2021-01-28 07:09:18 +0100 |
| commit | 0870ebb3cbfcb097d85eea5eacaf992dd88ed204 (patch) | |
| tree | da7970460e8e52b6335e54426fdcfbf26b220ffe /lisp/textmodes | |
| parent | e4c667079086528c6e0a9eead9c2d4d5f5b7c6e1 (diff) | |
| download | emacs-0870ebb3cbfcb097d85eea5eacaf992dd88ed204.tar.gz emacs-0870ebb3cbfcb097d85eea5eacaf992dd88ed204.zip | |
Allow commenting out white space lines in latex-mode
* lisp/newcomment.el (comment-region-default-1): Allow commenting
out whitespace-only regions (bug#41793).
* lisp/textmodes/tex-mode.el (latex--comment-region): Use it.
(latex-mode): Set a comment style shim.
Diffstat (limited to 'lisp/textmodes')
| -rw-r--r-- | lisp/textmodes/tex-mode.el | 7 |
1 files changed, 6 insertions, 1 deletions
diff --git a/lisp/textmodes/tex-mode.el b/lisp/textmodes/tex-mode.el index c4e4864da17..ce665e61656 100644 --- a/lisp/textmodes/tex-mode.el +++ b/lisp/textmodes/tex-mode.el | |||
| @@ -1169,7 +1169,12 @@ subshell is initiated, `tex-shell-hook' is run." | |||
| 1169 | (setq-local outline-regexp latex-outline-regexp) | 1169 | (setq-local outline-regexp latex-outline-regexp) |
| 1170 | (setq-local outline-level #'latex-outline-level) | 1170 | (setq-local outline-level #'latex-outline-level) |
| 1171 | (setq-local forward-sexp-function #'latex-forward-sexp) | 1171 | (setq-local forward-sexp-function #'latex-forward-sexp) |
| 1172 | (setq-local skeleton-end-hook nil)) | 1172 | (setq-local skeleton-end-hook nil) |
| 1173 | (setq-local comment-region-function #'latex--comment-region) | ||
| 1174 | (setq-local comment-style 'plain)) | ||
| 1175 | |||
| 1176 | (defun latex--comment-region (beg end &optional arg) | ||
| 1177 | (comment-region-default-1 beg end arg t)) | ||
| 1173 | 1178 | ||
| 1174 | ;;;###autoload | 1179 | ;;;###autoload |
| 1175 | (define-derived-mode slitex-mode latex-mode "SliTeX" | 1180 | (define-derived-mode slitex-mode latex-mode "SliTeX" |