# HG changeset patch # User Glenn Morris # Date 1187480672 0 # Node ID 0327a004a45d642e4684a60ae77ac17166e73e75 # Parent f414c98b5fdb7e2a80f8b5b9088fb3a4037bd27d (scheme-mode-variables): Set font-lock-comment-start-skip. diff -r f414c98b5fdb -r 0327a004a45d lisp/progmodes/scheme.el --- a/lisp/progmodes/scheme.el Sat Aug 18 23:44:21 2007 +0000 +++ b/lisp/progmodes/scheme.el Sat Aug 18 23:44:32 2007 +0000 @@ -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)