diff options
| author | Glenn Morris | 2007-08-18 23:44:32 +0000 |
|---|---|---|
| committer | Glenn Morris | 2007-08-18 23:44:32 +0000 |
| commit | e01e5b4d0f629973cd3a46ba61d43b3bef34590f (patch) | |
| tree | 49504d5da9f841779ac08efe5d701c3737c06115 | |
| parent | e5eeb98c62797a1e2fabf8f70ff92a50bf98dc7c (diff) | |
| download | emacs-e01e5b4d0f629973cd3a46ba61d43b3bef34590f.tar.gz emacs-e01e5b4d0f629973cd3a46ba61d43b3bef34590f.zip | |
(scheme-mode-variables): Set font-lock-comment-start-skip.
| -rw-r--r-- | lisp/progmodes/scheme.el | 1 |
1 files changed, 1 insertions, 0 deletions
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 @@ | |||
| 156 | ;; Look within the line for a ; following an even number of backslashes | 156 | ;; Look within the line for a ; following an even number of backslashes |
| 157 | ;; after either a non-backslash or the line beginning. | 157 | ;; after either a non-backslash or the line beginning. |
| 158 | (setq comment-start-skip "\\(\\(^\\|[^\\\\\n]\\)\\(\\\\\\\\\\)*\\);+[ \t]*") | 158 | (setq comment-start-skip "\\(\\(^\\|[^\\\\\n]\\)\\(\\\\\\\\\\)*\\);+[ \t]*") |
| 159 | (set (make-local-variable 'font-lock-comment-start-skip) ";+ *") | ||
| 159 | (make-local-variable 'comment-column) | 160 | (make-local-variable 'comment-column) |
| 160 | (setq comment-column 40) | 161 | (setq comment-column 40) |
| 161 | (make-local-variable 'parse-sexp-ignore-comments) | 162 | (make-local-variable 'parse-sexp-ignore-comments) |