Skip to content

Commit 3b5c9bb

Browse files
committed
Rename faces.
1 parent a97823d commit 3b5c9bb

File tree

1 file changed

+13
-11
lines changed

1 file changed

+13
-11
lines changed

docstr-faces.el

Lines changed: 13 additions & 11 deletions
Original file line numberDiff line numberDiff line change
@@ -24,37 +24,39 @@
2424

2525
;;; Code:
2626

27-
(defface docstr-tag-face
27+
(require 'docstr)
28+
29+
(defface docstr-faces-tag-face
2830
'((t (:foreground "SlateGray")))
2931
"Highlighting for Docstring tag."
3032
:group 'docstr)
31-
(defvar docstr-tag-face 'docstr-tag-face)
33+
(defvar docstr-faces-tag-face 'docstr-faces-tag-face)
3234

33-
(defface docstr-type-face
35+
(defface docstr-faces-type-face
3436
'((t (:foreground "SteelBlue")))
3537
"Highlighting for Docstring type."
3638
:group 'docstr)
37-
(defvar docstr-type-face 'docstr-type-face)
39+
(defvar docstr-faces-type-face 'docstr-faces-type-face)
3840

39-
(defface docstr-value-face
41+
(defface docstr-faces-value-face
4042
'((t (:foreground "gold4")))
4143
"Highlighting for Docstring value."
4244
:group 'docstr)
43-
(defvar docstr-value-face 'docstr-value-face)
45+
(defvar docstr-faces-value-face 'docstr-faces-value-face)
4446

45-
(defun docstr-apply-faces ()
47+
(defun docstr-faces-apply ()
4648
"Apply standard document string faces."
4749
(dolist (mode (docstr-major-modes))
4850
(font-lock-add-keywords
4951
mode
5052
'(;; `@param` { typename } val-tag : value tag description..
51-
("\\(?:^\\|\\s-\\)\\(@[^ \"'{}()\t\r\n]+\\)" 1 'docstr-tag-face t)
53+
("\\(?:^\\|\\s-\\)\\(@[^ \"'{}()\t\r\n]+\\)" 1 'docstr-faces-tag-face t)
5254
;; @param `{ typename }` val-tag : value tag description..
53-
("[ \t]+@[^ \t\r\n]+\\(?:^\\|\\s-\\)\\([\\[{][^}]*.\\)" 1 'docstr-type-face t)
55+
("[ \t]+@[^ \t\r\n]+\\(?:^\\|\\s-\\)\\([\\[{][^}]*.\\)" 1 'docstr-faces-type-face t)
5456
;; @param { typename } `val-tag` : value tag description..
55-
("[ \t]+@[^ \t\r\n].*[\]\|}]\\([^\r\n]*\\)[:-]" 1 'docstr-value-face t)
57+
("[ \t]+@[^ \t\r\n].*[\]\|}]\\([^\r\n]*\\)[:-]" 1 'docstr-faces-value-face t)
5658
;; @param `val-tag` : value tag description..
57-
("[ \t]+@[^ \t\r\n]*[ \t]*\\([a-zA-Z0-9_.*&]*\\)[ \t\n]*[{:-]" 1 'docstr-value-face t))
59+
("[ \t]+@[^ \t\r\n]*[ \t]*\\([a-zA-Z0-9_.*&]*\\)[ \t\n]*[{:-]" 1 'docstr-faces-value-face t))
5860
'end)))
5961

6062
(provide 'docstr-faces)

0 commit comments

Comments
 (0)