diff options
Diffstat (limited to 'coq/coq-db.el')
| -rw-r--r-- | coq/coq-db.el | 14 |
1 files changed, 14 insertions, 0 deletions
diff --git a/coq/coq-db.el b/coq/coq-db.el index 631df56d..0d9c0a6e 100644 --- a/coq/coq-db.el +++ b/coq/coq-db.el @@ -305,11 +305,21 @@ See `coq-syntax-db' for DB structure." "Face for unicode binders, by default a bold version of `font-lock-type-face'." :group 'proof-faces) +(defface coq-symbol-face + '((t :inherit default-face :bold coq-bold-unicode-binders)) + "Face for unicode binders, by default a bold version of `font-lock-type-face'." + :group 'proof-faces) + (defface coq-question-mark-face '((t :inherit font-lock-variable-name-face)) "Face for Ltac binders and evars." :group 'proof-faces) +(defface coq-context-qualifier-face + '((t :inherit font-lock-preprocessor-face :weight bold)) + "Face used for `ltac:', `constr:', and `uconstr:' headers." + :group 'proof-faces) + (defconst coq-solve-tactics-face 'coq-solve-tactics-face "Expression that evaluates to a face. Required so that 'coq-solve-tactics-face is a proper facename") @@ -322,6 +332,10 @@ Required so that 'coq-cheat-face is a proper facename") "Expression that evaluates to a face. Required so that 'coq-symbol-binder-face is a proper facename") +(defconst coq-symbol-face 'coq-symbol-face + "Expression that evaluates to a face. +Required so that 'coq-symbol-binder-face is a proper facename") + (defconst coq-question-mark-face 'coq-question-mark-face) |