emacs-pretest-bug
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

delphi-fill-comment could use a "save-restriction"


From: Eric Hanchrow
Subject: delphi-fill-comment could use a "save-restriction"
Date: Fri, 21 Jul 2006 10:48:04 -0700
User-agent: Gnus/5.11 (Gnus v5.11) Emacs/22.0.51 (gnu/linux)

Index: delphi.el
===================================================================
RCS file: /sources/emacs/emacs/lisp/progmodes/delphi.el,v
retrieving revision 3.22
diff -w -u -b -u -r3.22 delphi.el
--- delphi.el   10 Feb 2006 09:00:30 -0000      3.22
+++ delphi.el   21 Jul 2006 17:44:56 -0000
@@ -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


If emacs crashed, and you have the emacs process in the gdb debugger,
please include the output from the following gdb commands:
    `bt full' and `xbacktrace'.
If you would like to further debug the crash, please read the file
d:/emacs22/etc/DEBUG for instructions.


In GNU Emacs 22.0.50.1 (i386-mingw-nt5.0.2195)
 of 2006-06-04 on TPAD
X server distributor `Microsoft Corp.', version 5.0.2195
configured using `configure --with-gcc (3.4) --cflags  -O2 -march=i686 
-mtune=i686 -ffast-math -IC:/gnuwin32/include_emacs -IC:/gnuwin32/lib 
-IC:/gnuwin32/src --ldflags  -s '

Important settings:
  value of $LC_ALL: nil
  value of $LC_COLLATE: nil
  value of $LC_CTYPE: nil
  value of $LC_MESSAGES: nil
  value of $LC_MONETARY: nil
  value of $LC_NUMERIC: nil
  value of $LC_TIME: nil
  value of $LANG: nil
  locale-coding-system: cp1252
  default-enable-multibyte-characters: t

Major mode: Emacs-Lisp

Minor modes in effect:
  eldoc-mode: t
  erc-autojoin-mode: t
  erc-match-mode: t
  shell-dirtrack-mode: t
  display-time-mode: t
  iswitchb-mode: t
  encoded-kbd-mode: t
  tooltip-mode: t
  mouse-wheel-mode: t
  file-name-shadow-mode: t
  global-font-lock-mode: t
  font-lock-mode: t
  blink-cursor-mode: t
  unify-8859-on-encoding-mode: t
  utf-translate-cjk-mode: t
  auto-compression-mode: t
  line-number-mode: t
  transient-mark-mode: t

Recent input:
M-v C-h i i s a v e - r e s <tab> <return> C-s e x 
c C-a q C-M-a C-n C-u C-n M-m C-M-o M-1 M-( s a v e 
- r e s t r M-/ C-M-u C-M-q C-M-n C-M-p C-x C-s C-M-x 
M-x b u r y <return> C-x n d M-q C-x C-s C-x b <return> 
C-x n w C-x b . e l C-r <return> C-x n w M-< M-x p 
w d <return> C-x v = C-x h M-w C-x 0 M-x r e p o r 
t - e m <tab> <return>

Recent messages:
Wrote d:/emacs22/lisp/progmodes/delphi.el
delphi-fill-comment
Wrote d:/data/absentee/barcode-generator/Unit3.pas
Mark set
Directory d:/emacs22/lisp/progmodes/
Running cvs in the background... done
Mark set [2 times]
Saved text until " indented such that one is still in the
"
Loading emacsbug...done

-- 
There is such a thing as American-ness.  ... [H]ackers ... come
closest of any group I know to embodying it.  Closer, probably, than
the men running our government.
        -- Paul Graham




reply via email to

[Prev in Thread] Current Thread [Next in Thread]