Trying to align a region in VHDL mode (using `vhdl-align-region')
results in an infinite loop when trying to fix the whitespace around
operator symbols.  The culprit is an incorrect goto-char in
`vhdl-fixup-whitespace-region', the patch below fixes things

Index: lisp/progmodes/vhdl-mode.el
===================================================================
RCS file: /cvsroot/emacs/emacs/lisp/progmodes/vhdl-mode.el,v
retrieving revision 1.25
diff -u -r1.25 vhdl-mode.el
*** lisp/progmodes/vhdl-mode.el 25 Mar 2005 10:06:23 -0000      1.25
--- lisp/progmodes/vhdl-mode.el 4 Apr 2005 22:24:00 -0000
***************
*** 7480,7486 ****
        (if (match-string 1)
          (goto-char (match-end 1))
        (replace-match "\\3 \\4 \\5")
!       (goto-char (match-end 4))))
      ;; eliminate multiple spaces and spaces at end of line
      (goto-char beg)
      (while (or (and (looking-at "--.*\n") (re-search-forward "--.*\n" end t))
--- 7480,7486 ----
        (if (match-string 1)
          (goto-char (match-end 1))
        (replace-match "\\3 \\4 \\5")
!       (goto-char (match-end 5))))
      ;; eliminate multiple spaces and spaces at end of line
      (goto-char beg)
      (while (or (and (looking-at "--.*\n") (re-search-forward "--.*\n" end t))



In GNU Emacs 22.0.50.2 (i686-pc-linux-gnu, GTK+ Version 2.6.2)
 of 2005-03-28 on yam
Distributor `The XFree86 Project, Inc', version 11.0.40300001
configured using `configure '--with-gtk' '--without-xim' '--with-gif'
'--with-png' '--with-xpm' '--with-jpeg' '--with-tiff' '--without-pop'
'--with-x-toolkit=gtk' '--without-sound' '--prefix=/opt/sw/emacs/''

-- 
Lawrence Mitchell <[EMAIL PROTECTED]>


_______________________________________________
Emacs-pretest-bug mailing list
[email protected]
http://lists.gnu.org/mailman/listinfo/emacs-pretest-bug

Reply via email to