# HG changeset patch
# User Miles Bader <miles@gnu.org>
# Date 836459150 0
# Node ID ca84d7021f4ee79d8cddac4fb285f87e2afe969c
# Parent  7d29420c2fec19eea44475bf2ed64a3baf3113e0
(lisp-mode-variables): Set comment-start-skip to ignore backslash-quoted
	semicolons.

diff -r 7d29420c2fec -r ca84d7021f4e lisp/emacs-lisp/lisp-mode.el
--- a/lisp/emacs-lisp/lisp-mode.el	Thu Jul 04 05:45:38 1996 +0000
+++ b/lisp/emacs-lisp/lisp-mode.el	Thu Jul 04 05:45:50 1996 +0000
@@ -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)