procyberian/emacs
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

scheme.el: Turn literal tabs into \t

Browse source 
* lisp/progmodes/scheme.el: The last change to turn tabs into spaces
also caught some literal tabs in character classes. Fix this by
adding \t to those classes.
This commit is contained in:
Jorgen Schaefer 2016-05-07 12:22:48 +02:00
parent 4a6d39b395
commit bf7fc7a804
1 changed files with 3 additions and 3 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

6
lisp/progmodes/scheme.el
View file

@ -425,7 +425,7 @@ that variable's value is a string."
(eval-when-compile
(list
;; Similar to Scheme
(list "(\\(define\\(-\\w+\\)?\\)\\>[ ]*\\((?\\)\\(\\sw+\\)\\>"
(list "(\\(define\\(-\\w+\\)?\\)\\>[ \t]*\\((?\\)\\(\\sw+\\)\\>"
'(1 font-lock-keyword-face)
'(4 font-lock-function-name-face))
(cons
@ -437,10 +437,10 @@ that variable's value is a string."
"\\)\\>")
1)
;; DSSSL syntax
'("(\\(element\\|mode\\|declare-\\w+\\)\\>[ ]*\\(\\sw+\\)"
'("(\\(element\\|mode\\|declare-\\w+\\)\\>[ \t]*\\(\\sw+\\)"
(1 font-lock-keyword-face)
(2 font-lock-type-face))
'("(\\(element\\)\\>[ ]*(\\(\\S)+\\))"
'("(\\(element\\)\\>[ \t]*(\\(\\S)+\\))"
(1 font-lock-keyword-face)
(2 font-lock-type-face))
'("\\<\\sw+:\\>" . font-lock-constant-face) ; trailing `:' c.f. scheme