From bcbeac8c54f8e87a30684b88a8c00beb061f6871 Mon Sep 17 00:00:00 2001
From: =?utf8?q?Francesco=20Potort=C3=AC?= <pot@gnu.org>
Date: Tue, 4 Mar 2003 14:33:05 +0000
Subject: [PATCH] (vhdl-comment-uncomment-region): Remove two comment
 characters at start of line instead of one.

---
 lisp/progmodes/vhdl-mode.el | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/lisp/progmodes/vhdl-mode.el b/lisp/progmodes/vhdl-mode.el
index f60ff83fd15..873361e7337 100644
--- a/lisp/progmodes/vhdl-mode.el
+++ b/lisp/progmodes/vhdl-mode.el
@@ -605,7 +605,7 @@ begin  -- process <label>
     <cursor>
   elsif <clock>'event and <clock> = '1' then  -- rising clock edge
     if <enable> = '1' then  -- synchronous load
-      
+
     end if;
   end if;
 end process <label>;"
@@ -7567,7 +7567,7 @@ If starting after end-comment-column, start a new line."
     (beginning-of-line)
     (setq beg (point))
     (if (looking-at comment-start)
-	(comment-region beg end -1)
+	(comment-region beg end -2)
       (comment-region beg end))))
 
 (defun vhdl-comment-uncomment-line (&optional arg)
-- 
2.39.5