From fd92cc8c646dfc61bdcff1359e2d30bb24f69246 Mon Sep 17 00:00:00 2001 From: bw Date: Sun, 28 Jun 2026 19:01:45 -0400 Subject: [PATCH] hywiki-include-special-modes - Add csv, GNUS, mh, mu4e and rmail - hpath:delimited-possible-path - Fix 'char-syntax' comparison to compare current char's syntax against the punctuation char, not the char-syntax of the punctuation char. --- ChangeLog | 7 +++++++ hpath.el | 4 ++-- hywiki.el | 11 +++++++++-- 3 files changed, 18 insertions(+), 4 deletions(-) diff --git a/ChangeLog b/ChangeLog index 42e66491..1fb22bb3 100644 --- a/ChangeLog +++ b/ChangeLog @@ -1,5 +1,12 @@ 2026-06-28 Bob Weiner +* hywiki.el (hywiki-include-special-modes): Add HyWiki support in csv, + GNUS, mh, mu4e and rmail modes. + +* hpath.el (hpath:delimited-possible-path): Fix 'char-syntax' comparison + to compare current char's syntax against the punctuation char, not + the char-syntax of the punctuation char. + * test/hui-tests.el (hui--hbut-act--links): Add for testing that ilinks, elinks and glinks do not confuse each others referents. diff --git a/hpath.el b/hpath.el index 5c78fdd5..b8bfb35e 100644 --- a/hpath.el +++ b/hpath.el @@ -3,7 +3,7 @@ ;; Author: Bob Weiner ;; ;; Orig-Date: 1-Nov-91 at 00:44:23 -;; Last-Mod: 28-Jun-26 at 14:18:59 by Bob Weiner +;; Last-Mod: 28-Jun-26 at 16:52:07 by Bob Weiner ;; ;; SPDX-License-Identifier: GPL-3.0-or-later ;; @@ -1189,7 +1189,7 @@ end-pos) or nil." (when (and (stringp p) (not (string-match-p "\\`{.*}\\'\\|\"\\|\\`[/\\]+\\'" p)) (delq nil (mapcar (lambda (c) (or (memq c '(?~ ?. ?/ ?* ?? ?\\)) - (/= (char-syntax ?.) (char-syntax c)))) + (/= (char-syntax c) ?.))) p))) ;; Prepend proper directory from cd, ls *, recursive ls or dir file ;; listings when needed. diff --git a/hywiki.el b/hywiki.el index 4be002a0..e6ea33d6 100644 --- a/hywiki.el +++ b/hywiki.el @@ -3,7 +3,7 @@ ;; Author: Bob Weiner ;; ;; Orig-Date: 21-Apr-24 at 22:41:13 -;; Last-Mod: 27-Jun-26 at 18:45:09 by Bob Weiner +;; Last-Mod: 28-Jun-26 at 18:53:13 by Bob Weiner ;; ;; SPDX-License-Identifier: GPL-3.0-or-later ;; @@ -326,7 +326,14 @@ included in the list, `hywiki-include-special-modes'." :group 'hyperbole-hywiki) (defcustom hywiki-include-special-modes - '(elfeed-search-mode elfeed-show-mode eww-mode kotl-mode) + '(csv-mode + elfeed-search-mode elfeed-show-mode + eww-mode + gnus-article-edit-mode gnus-article-mode + kotl-mode + mh-letter-mode mh-show-mode + mu4e-headers-mode mu4e-main-mode + rmail-edit-mode rmail-mode) "List of `special' major modes with HyWikiWord highlighting and recognition. By default, all special modes, like Dired, are excluded. A major mode included here will override its inclusion in `hywiki-exclude-major-modes'."