From: Miles Bader <miles@gnu.org>
Date: Thu, 4 Jul 1996 05:45:50 +0000 (+0000)
Subject: (lisp-mode-variables): Set comment-start-skip to ignore backslash-quoted
X-Git-Tag: emacs-19.34~265
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=e56a043b86ebe02e30e2eaf15639e9db6c1bfc9c;p=emacs.git

(lisp-mode-variables): Set comment-start-skip to ignore backslash-quoted
	semicolons.
---

diff --git a/lisp/emacs-lisp/lisp-mode.el b/lisp/emacs-lisp/lisp-mode.el
index 9879b9f5fae..541cbe6f445 100644
--- a/lisp/emacs-lisp/lisp-mode.el
+++ b/lisp/emacs-lisp/lisp-mode.el
@@ -119,7 +119,9 @@
   (make-local-variable 'comment-start)
   (setq comment-start ";")
   (make-local-variable 'comment-start-skip)
-  (setq comment-start-skip ";+ *")
+  ;; Look within the line for a ; following an even number of backslashes
+  ;; after either a non-backslash or the line beginning.
+  (setq comment-start-skip "\\(\\(^\\|[^\\\\\n]\\)\\(\\\\\\\\\\)*\\);+ *")
   (make-local-variable 'comment-column)
   (setq comment-column 40)
   (make-local-variable 'comment-indent-function)