Mercurial > emacs
changeset 15598:c5f04e0724ec
(scheme-mode-variables): Set comment-start-skip to ignore backslash-quoted
semicolons.
| author | Miles Bader <miles@gnu.org> |
|---|---|
| date | Thu, 04 Jul 1996 05:45:55 +0000 |
| parents | ca84d7021f4e |
| children | 7d3af2dcd864 |
| files | lisp/progmodes/scheme.el |
| diffstat | 1 files changed, 3 insertions(+), 1 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/progmodes/scheme.el Thu Jul 04 05:45:50 1996 +0000 +++ b/lisp/progmodes/scheme.el Thu Jul 04 05:45:55 1996 +0000 @@ -104,7 +104,9 @@ (make-local-variable 'comment-start) (setq comment-start ";") (make-local-variable 'comment-start-skip) - (setq comment-start-skip ";+[ \t]*") + ;; 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]\\)\\(\\\\\\\\\\)*\\);+[ \t]*") (make-local-variable 'comment-column) (setq comment-column 40) (make-local-variable 'comment-indent-function)