From f973054857cb128b7ce7b7351971dd48b00bde06 Mon Sep 17 00:00:00 2001 From: Benson Chu Date: Mon, 31 Oct 2022 12:08:58 -0500 Subject: [PATCH] Use RX for this regexp --- lisp/org-config/my-org-tags.el | 8 ++++---- 1 file changed, 4 insertions(+), 4 deletions(-) diff --git a/lisp/org-config/my-org-tags.el b/lisp/org-config/my-org-tags.el index 9819985..c4dae70 100644 --- a/lisp/org-config/my-org-tags.el +++ b/lisp/org-config/my-org-tags.el @@ -86,10 +86,10 @@ (setq org-agenda-hide-tags-regexp - (mapconcat #'identity (list "time" "nontime" "prod" "dev" "sandbox" - "refile" - "short" "long" "watch" "read" "grow" "rest" "active" "idle") - "\\|")) + (rx (or "time" "nontime" "prod" "dev" "sandbox" + "refile" + "short" "long" "watch" "read" "grow" "rest" "active" "idle" + (and symbol-start "_" (+ nonl) "_" symbol-end)))) (defconst category-tags '("computers"))