CVSROOT: /cvsroot/auctex
Module name: auctex
Changes by: Ralf Angeli <angeli> 06/11/16 21:03:53
Index: latex.el
===================================================================
RCS file: /cvsroot/auctex/auctex/latex.el,v
retrieving revision 5.425
retrieving revision 5.426
diff -u -b -r5.425 -r5.426
--- latex.el 7 Oct 2006 21:13:06 -0000 5.425
+++ latex.el 16 Nov 2006 21:03:53 -0000 5.426
@@ -2733,7 +2733,12 @@
(while (not (looking-at TeX-comment-start-regexp)) (forward-char))
(skip-chars-backward " \t")
(skip-chars-backward "^ \t\n")
- (when (not (bolp))
+ (unless (or (bolp)
+ ;; Comment starters and whitespace.
+ (TeX-looking-at-backward
+ (concat "^\\([ \t]*" TeX-comment-start-regexp
+ "+\\)+[ \t]*")
+ (line-beginning-position)))
(LaTeX-fill-newline)))))
;; Leave point after final newline.
(goto-char to)
_______________________________________________
auctex-commit mailing list
[EMAIL PROTECTED]
http://lists.gnu.org/mailman/listinfo/auctex-commit
