Does this fix it?
*** vhdl-mode.el 27 May 2005 10:21:39 -0400 1.30
--- vhdl-mode.el 30 May 2005 08:49:30 -0400
***************
*** 7484,7490 ****
(while (re-search-forward
"\\(--.*\n\\|\"[^\"\n]*[\"\n]\\)\\|\\(\\([^/:<>=]\\)\\(:\\|=\\|<\\|>\\|:=\\|<=\\|>=\\|=>\\|/=\\)\\([^=>]\\|$\\)\\)"
end t)
(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)
--- 7484,7496 ----
(while (re-search-forward
"\\(--.*\n\\|\"[^\"\n]*[\"\n]\\)\\|\\(\\([^/:<>=]\\)\\(:\\|=\\|<\\|>\\|:=\\|<=\\|>=\\|=>\\|/=\\)\\([^=>]\\|$\\)\\)"
end t)
(if (match-string 1)
(goto-char (match-end 1))
! (save-excursion
! (goto-char (match-beginning 4))
! (unless (eq (preceding-char) ?\ )
! (insert " "))
! (goto-char (match-end 4))
! (unless (eq (following-char) ?\ )
! (insert " ")))
(goto-char (match-end 4))))
;; eliminate multiple spaces and spaces at end of line
(goto-char beg)
_______________________________________________
Emacs-pretest-bug mailing list
[email protected]
http://lists.gnu.org/mailman/listinfo/emacs-pretest-bug
