From e8612bf263b21df67717e5767d4b982bd24addb0 Mon Sep 17 00:00:00 2001 From: Glenn Morris Date: Sat, 18 Aug 2007 23:45:58 +0000 Subject: [PATCH] (scheme-mode-variables): Set font-lock-comment-start-skip. --- lisp/ChangeLog | 5 +++++ lisp/progmodes/scheme.el | 1 + 2 files changed, 6 insertions(+) diff --git a/lisp/ChangeLog b/lisp/ChangeLog index 027f4193254..1ac0632ff68 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -1,3 +1,8 @@ +2007-08-18 Glenn Morris + + * progmodes/scheme.el (scheme-mode-variables): Set + font-lock-comment-start-skip. + 2007-08-18 Martin Rudalics * progmodes/ada-mode.el (ada-create-syntax-table): Move diff --git a/lisp/progmodes/scheme.el b/lisp/progmodes/scheme.el index 5bf7cb1e9eb..e5fb8cbc7f8 100644 --- a/lisp/progmodes/scheme.el +++ b/lisp/progmodes/scheme.el @@ -156,6 +156,7 @@ ;; 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]*") + (set (make-local-variable 'font-lock-comment-start-skip) ";+ *") (make-local-variable 'comment-column) (setq comment-column 40) (make-local-variable 'parse-sexp-ignore-comments) -- 2.39.5