[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
01/07: emacs: devel: Highlight gexp symbols.
From: |
Alex Kost |
Subject: |
01/07: emacs: devel: Highlight gexp symbols. |
Date: |
Fri, 09 Oct 2015 13:53:23 +0000 |
alezost pushed a commit to branch master
in repository guix.
commit 1af9815d81090e10a0f89596482e572dc59e454b
Author: Alex Kost <address@hidden>
Date: Sat Sep 26 22:42:07 2015 +0300
emacs: devel: Highlight gexp symbols.
Suggested by Ludovic Courtès <address@hidden>.
* emacs/guix-devel.el (guix-devel-gexp-symbol): New face.
(guix-devel-font-lock-keywords): Adjust to handle gexp symbols.
---
emacs/guix-devel.el | 10 +++++++++-
1 files changed, 9 insertions(+), 1 deletions(-)
diff --git a/emacs/guix-devel.el b/emacs/guix-devel.el
index 8a6fc1e..2e85a7e 100644
--- a/emacs/guix-devel.el
+++ b/emacs/guix-devel.el
@@ -43,6 +43,12 @@
"Face for a `modify-phases' keyword ('delete', 'replace', etc.)."
:group 'guix-devel-faces)
+(defface guix-devel-gexp-symbol
+ '((t :inherit font-lock-keyword-face))
+ "Face for gexp symbols ('#~', '#$', etc.).
+See Info node `(guix) G-Expressions'."
+ :group 'guix-devel-faces)
+
(defcustom guix-devel-activate-mode t
"If non-nil, then `guix-devel-mode' is automatically activated
in Scheme buffers."
@@ -130,7 +136,9 @@ to find 'modify-phases' keywords."
(save-excursion (up-list) (point)))
(defvar guix-devel-font-lock-keywords
- `((,(guix-guile-keyword-regexp "modify-phases")
+ `((,(rx (or "#~" "#$" "#$@" "#+" "#+@")) .
+ 'guix-devel-gexp-symbol)
+ (,(guix-guile-keyword-regexp "modify-phases")
(1 'font-lock-keyword-face)
(guix-devel-modify-phases-font-lock-matcher
(guix-devel-modify-phases-font-lock-pre)
- branch master updated (b588177 -> b94ef11), Alex Kost, 2015/10/09
- 04/07: emacs: Fix 'guix-devel-setup-repl'., Alex Kost, 2015/10/09
- 07/07: emacs: Add 'guix-devel-lint-package', Alex Kost, 2015/10/09
- 02/07: emacs: devel: Fix 'modify-phases' highlighting., Alex Kost, 2015/10/09
- 03/07: emacs: Fix 'guix-build-log-phase-toggle-all'., Alex Kost, 2015/10/10
- 06/07: lint: Export 'run-checkers'., Alex Kost, 2015/10/10
- 05/07: emacs: Add 'guix-devel-with-definition'., Alex Kost, 2015/10/10
- 01/07: emacs: devel: Highlight gexp symbols.,
Alex Kost <=