Commit 883212ce authored by Simon Marshall's avatar Simon Marshall
Browse files

Changed font-lock-reference-face to font-lock-constant-face.

parent b6908641
......@@ -345,7 +345,7 @@ if that value is non-nil and inserts the value of
'("(\\(element\\)\\>[ ]*(\\(\\S)+\\))"
(1 font-lock-keyword-face)
(2 font-lock-type-face))
'("\\<\\sw+:\\>" . font-lock-reference-face) ; trailing `:' c.f. scheme
'("\\<\\sw+:\\>" . font-lock-constant-face) ; trailing `:' c.f. scheme
;; SGML markup (from sgml-mode) :
'("<\\([!?][-a-z0-9]+\\)" 1 font-lock-keyword-face)
'("<\\(/?[-a-z0-9]+\\)" 1 font-lock-function-name-face)))
......
......@@ -141,7 +141,7 @@ for SIMULA mode to function correctly.")
(if (match-beginning 1) font-lock-string-face font-lock-comment-face))
;;
;; Compiler directives.
'("^%\\([^ \t\n].*\\)" 1 font-lock-reference-face)
'("^%\\([^ \t\n].*\\)" 1 font-lock-constant-face)
;;
;; Class and procedure names.
'("\\<\\(class\\|procedure\\)\\>[ \t]*\\(\\sw+\\)?"
......@@ -153,8 +153,8 @@ for SIMULA mode to function correctly.")
(append simula-font-lock-keywords-1
(list
;;
;; Constants as references.
'("\\<\\(false\\|none\\|notext\\|true\\)\\>" . font-lock-reference-face)
;; Constants.
'("\\<\\(false\\|none\\|notext\\|true\\)\\>" . font-lock-constant-face)
;;
;; Keywords.
(concat "\\<\\("
......
......@@ -1278,7 +1278,7 @@ This applies to generating PostScript."
(defcustom ps-underlined-faces
(unless ps-print-color-p
'(font-lock-function-name-face
font-lock-reference-face
font-lock-constant-face
font-lock-warning-face))
"*A list of the \(non-underlined\) faces that should be printed underlined.
This applies to generating PostScript."
......
......@@ -1118,7 +1118,7 @@ the value of `bibtex-text-indentation', minus 2."
;; reference type and reference label
(list bibtex-reference-maybe-empty-head
(list bibtex-type-in-head 'font-lock-function-name-face)
(list bibtex-key-in-head 'font-lock-reference-face nil t))
(list bibtex-key-in-head 'font-lock-constant-face nil t))
;; comments
(list
(concat "^\\([ \t]*" bibtex-comment-start ".*\\)$")
......
......@@ -156,7 +156,7 @@ in the file it applies to."
(3 . font-lock-keyword-face)
(4 . font-lock-builtin-face)
(5 . font-lock-comment-face)
(6 . font-lock-reference-face)
(6 . font-lock-constant-face)
(7 . font-lock-type-face)
(8 . font-lock-string-face))))
font-lock-warning-face)
......
......@@ -2699,7 +2699,7 @@ When called with 2 C-u prefix args, disable magic word recognition."
(- (point) (length label)) (point)
'face (if comment
'font-lock-comment-face
'font-lock-reference-face)))
'font-lock-constant-face)))
(insert (if counter (format " (%d) " cnt) "")
(if comment " LABEL IS COMMENTED OUT " "")
......@@ -4114,7 +4114,7 @@ started with the command \\[reftex-citation].")
authors)
(put-text-property 0 (length title) 'face 'font-lock-comment-face
title)
(put-text-property 0 (length extra) 'face 'font-lock-reference-face
(put-text-property 0 (length extra) 'face 'font-lock-constant-face
extra))
(concat key "\n " authors " " year " " extra "\n " title "\n\n")))
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment