[elpa] externals/hyperbole 4b1c74bdb5 02/18: Merge pull request #610 from rswgnu/rsw

[ELPA Syncer]

branch: externals/hyperbole
commit 4b1c74bdb5fc094fe883de8a9bb7473ecab26bd1
Merge: 7ccfb435ff 0b7e746665
Author: Robert Weiner <rsw@gnu.org>
Commit: GitHub <noreply@github.com>

    Merge pull request #610 from rswgnu/rsw
    
    hywiki-maybe-dehighlight-page-name - Exclude char after HyWikiWord
---
 ChangeLog | 3 ++-
 hywiki.el | 4 ++--
 2 files changed, 4 insertions(+), 3 deletions(-)

diff --git a/ChangeLog b/ChangeLog
index b2a7db01f2..788ec03965 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,6 +1,7 @@
 2024-11-17  Bob Weiner  <rsw@gnu.org>
 
-* hywiki.el (hywiki-word-at): Fix to exclude any char after the HyWikiWord, if 
any.
+* hywiki.el (hywiki-word-at, hywiki-maybe-dehighlight-page-name): Fix to 
exclude
+    any char after the HyWikiWord, if any.
 
 * hproperty.el (hproperty:but-get-all-in-region): Return only overlays that 
still
     point to some buffer (may have overlay references that have been deleted 
and point
diff --git a/hywiki.el b/hywiki.el
index 1eb570ef5c..6f6e232ce8 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:     17-Nov-24 at 10:27:44 by Bob Weiner
+;; Last-Mod:     17-Nov-24 at 15:56:48 by Bob Weiner
 ;;
 ;; SPDX-License-Identifier: GPL-3.0-or-later
 ;;
@@ -1188,7 +1188,7 @@ If in a programming mode, must be within a comment.  Use
                     (progn
                       (setq hywiki--page-name (match-string-no-properties 1)
                             hywiki--start (match-beginning 0)
-                            hywiki--end   (1- (match-end 0)))
+                            hywiki--end   (match-beginning 3))
                       (and (hywiki-get-page hywiki--page-name)
                            ;; Ignore wikiwords preceded by any non-whitespace 
character
                            ;; (or (bolp) (memq (preceding-char) '(?\  ?\t)))