[Emacs-diffs] Changes to emacs/lisp/progmodes/delphi.el,v

[Eli Zaretskii]

CVSROOT:        /cvsroot/emacs
Module name:    emacs
Changes by:     Eli Zaretskii <eliz>    06/07/22 11:08:02

Index: delphi.el
===================================================================
RCS file: /cvsroot/emacs/emacs/lisp/progmodes/delphi.el,v
retrieving revision 3.22
retrieving revision 3.23
diff -u -b -r3.22 -r3.23
--- delphi.el   10 Feb 2006 09:00:30 -0000      3.22
+++ delphi.el   22 Jul 2006 11:08:02 -0000      3.23
@@ -1767,6 +1767,7 @@
 An error is raised if not in a comment."
   (interactive)
   (save-excursion
+    (save-restriction
     (let* ((comment (delphi-current-token))
            (comment-kind (delphi-token-kind comment)))
       (if (not (delphi-is comment-kind delphi-comments))
@@ -1845,7 +1846,7 @@
           ;; React to the entire fill change as a whole.
           (delphi-progress-start)
           (delphi-parse-region comment-start comment-end)
-          (delphi-progress-done))))))
+            (delphi-progress-done)))))))
 
 (defun delphi-new-comment-line ()
   "If in a // comment, does a newline, indented such that one is still in the