[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[elpa] externals/urgrep 91e3807239 109/115: Properly evaluate rx forms
From: |
ELPA Syncer |
Subject: |
[elpa] externals/urgrep 91e3807239 109/115: Properly evaluate rx forms |
Date: |
Wed, 10 May 2023 03:00:49 -0400 (EDT) |
branch: externals/urgrep
commit 91e38072390fed17bc1f18ceb0422d357cf46598
Author: Jim Porter <jporterbugs@gmail.com>
Commit: Jim Porter <jporterbugs@gmail.com>
Properly evaluate rx forms
---
urgrep.el | 19 +++++++++----------
1 file changed, 9 insertions(+), 10 deletions(-)
diff --git a/urgrep.el b/urgrep.el
index c721c5024e..ca72887642 100644
--- a/urgrep.el
+++ b/urgrep.el
@@ -709,20 +709,19 @@ line number."
(looking-at "[0-9]+\\([=-]\\).*$")))
(defvar urgrep-mode-font-lock-keywords
- `(((rx bol "Urgrep started" (* nonl))
+ `((,(rx bol "Urgrep started" (* nonl))
(0 '(face nil compilation-message nil help-echo nil mouse-face nil) t))
- ((rx bol "Urgrep finished with "
- (group (or (seq (? (+ digit) " ") (or "match" "matches"))
- "no matches")
- " found")
- (* nonl))
+ (,(rx bol "Urgrep finished with "
+ (or (group (? (+ digit) " ") (or "match" "matches") " found")
+ (group "no matches found"))
+ (* nonl))
(0 '(face nil compilation-message nil help-echo nil mouse-face nil) t)
(1 'urgrep-match-count nil t)
(2 'compilation-warning nil t))
- ((rx bol "Urgrep "
- (group (or "exited abnormally" "interrupt" "killed" "terminated"))
- (? (* nonl) " with code " (group (+ digit)))
- (* nonl))
+ (,(rx bol "Urgrep "
+ (group (or "exited abnormally" "interrupt" "killed" "terminated"))
+ (? (* nonl) " with code " (group (+ digit)))
+ (* nonl))
(0 '(face nil compilation-message nil help-echo nil mouse-face nil) t)
(1 'compilation-error)
(2 'compilation-error nil t))
- [elpa] externals/urgrep 43c82e84ec 082/115: Add CI for Emacs 27.1, (continued)
- [elpa] externals/urgrep 43c82e84ec 082/115: Add CI for Emacs 27.1, ELPA Syncer, 2023/05/10
- [elpa] externals/urgrep 3082d89bd9 099/115: Add support for abbreviating the command in urgrep buffers, ELPA Syncer, 2023/05/10
- [elpa] externals/urgrep b5b426e9ca 084/115: Fix hiding excessive part of rgrep command in Emacs 28, ELPA Syncer, 2023/05/10
- [elpa] externals/urgrep 56acdfe434 087/115: Improve how we wait for urgrep to finish in tests, ELPA Syncer, 2023/05/10
- [elpa] externals/urgrep 30cc9e363e 085/115: Fix context-line detection for find/grep, ELPA Syncer, 2023/05/10
- [elpa] externals/urgrep 0b036cdcf4 100/115: Improve explanation of `C-u C-u` for choosing directory, ELPA Syncer, 2023/05/10
- [elpa] externals/urgrep 6614dfe651 102/115: Update checkout action in CI, ELPA Syncer, 2023/05/10
- [elpa] externals/urgrep 01fbe92f2c 103/115: In tests, wait for grep to finish before doing any checks, ELPA Syncer, 2023/05/10
- [elpa] externals/urgrep 99e1de4eb1 105/115: Fix an edge case when unable to get the grouped filename for highlighting, ELPA Syncer, 2023/05/10
- [elpa] externals/urgrep f5b41c672b 106/115: Use `rx` in several places, ELPA Syncer, 2023/05/10
- [elpa] externals/urgrep 91e3807239 109/115: Properly evaluate rx forms,
ELPA Syncer <=
- [elpa] externals/urgrep 1d4bdca3d8 111/115: Add package keywords and such, ELPA Syncer, 2023/05/10
- [elpa] externals/urgrep 61ef67450b 114/115: Assign copyright to the FSF, ELPA Syncer, 2023/05/10