[AUCTeX-diffs] Changes to auctex/tex-buf.el,v

[Ralf Angeli]

CVSROOT:        /cvsroot/auctex
Module name:    auctex
Changes by:     Ralf Angeli <angeli>    08/05/01 13:59:20

Index: tex-buf.el
===================================================================
RCS file: /cvsroot/auctex/auctex/tex-buf.el,v
retrieving revision 1.271
retrieving revision 1.272
diff -u -b -r1.271 -r1.272
--- tex-buf.el  28 Apr 2008 09:07:14 -0000      1.271
+++ tex-buf.el  1 May 2008 13:59:19 -0000       1.272
@@ -1103,10 +1103,10 @@
        (while (> (point) pt)
          (end-of-line 0)
          (when (and (= (current-column) 79)
-                    ;; Heuristic: Don't delete the linebreak if there
-                    ;; is an empty line after the current one or
-                    ;; point is located after a period.
-                    (not (eq (char-after (1+ (point))) ?\n))
+                    ;; Heuristic: Don't delete the linebreak if the
+                    ;; next line is empty or starts with an opening
+                    ;; parenthesis or if point is located after a period.
+                    (not (memq (char-after (1+ (point))) '(?\n ?\()))
                     (not (eq (char-before) ?.)))
            (delete-char 1)))
        (goto-char (marker-position (process-mark process)))