[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Emacs-diffs] Changes to emacs/lisp/progmodes/scheme.el
From: |
Thien-Thi Nguyen |
Subject: |
[Emacs-diffs] Changes to emacs/lisp/progmodes/scheme.el |
Date: |
Tue, 30 Sep 2003 07:46:14 -0400 |
Index: emacs/lisp/progmodes/scheme.el
diff -c emacs/lisp/progmodes/scheme.el:1.45 emacs/lisp/progmodes/scheme.el:1.46
*** emacs/lisp/progmodes/scheme.el:1.45 Mon Sep 1 11:45:35 2003
--- emacs/lisp/progmodes/scheme.el Tue Sep 30 07:46:13 2003
***************
*** 165,171 ****
(setq font-lock-defaults
'((scheme-font-lock-keywords
scheme-font-lock-keywords-1 scheme-font-lock-keywords-2)
! nil t (("+-*/.<>=!?$%_&~^:" . "w")) beginning-of-defun
(font-lock-mark-block-function . mark-defun)
(font-lock-syntactic-face-function .
lisp-font-lock-syntactic-face-function))))
--- 165,171 ----
(setq font-lock-defaults
'((scheme-font-lock-keywords
scheme-font-lock-keywords-1 scheme-font-lock-keywords-2)
! nil t (("+-*/.<>=!?$%_&~^:#" . "w")) beginning-of-defun
(font-lock-mark-block-function . mark-defun)
(font-lock-syntactic-face-function .
lisp-font-lock-syntactic-face-function))))
***************
*** 337,344 ****
;; David Fox <address@hidden> for SOS/STklos class specifiers.
'("\\<<\\sw+>\\>" . font-lock-type-face)
;;
! ;; Scheme `:' keywords as builtins.
! '("\\<:\\sw+\\>" . font-lock-builtin-face)
)))
"Gaudy expressions to highlight in Scheme modes.")
--- 337,344 ----
;; David Fox <address@hidden> for SOS/STklos class specifiers.
'("\\<<\\sw+>\\>" . font-lock-type-face)
;;
! ;; Scheme `:' and `#:' keywords as builtins.
! '("\\<#?:\\sw+\\>" . font-lock-builtin-face)
)))
"Gaudy expressions to highlight in Scheme modes.")