branch: externals/hyperbole
commit c87bb410efbcb9cea715264944342385a5f6ebc4
Author: Mats Lidell <mats.lid...@lidells.se>
Commit: GitHub <nore...@github.com>

    Add test for issue gh#rswgnu/hyperbole/503 (#508)
---
 ChangeLog                |  5 +++++
 test/hmouse-drv-tests.el | 14 +++++++++++++-
 2 files changed, 18 insertions(+), 1 deletion(-)

diff --git a/ChangeLog b/ChangeLog
index 6173485f2c..1bdb2145b3 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,8 @@
+2024-04-05  Mats Lidell  <ma...@gnu.org>
+
+* test/hmouse-drv-tests.el (hbut-defil-verbatim): Add test for reported
+    issue gh#rswgnu/hyperbole/503.
+
 2024-04-01  Mats Lidell  <ma...@gnu.org>
 
 * test/hpath-tests.el (hpath:prepend-shell-directory-test):
diff --git a/test/hmouse-drv-tests.el b/test/hmouse-drv-tests.el
index df43e5a18d..31042ddbf8 100644
--- a/test/hmouse-drv-tests.el
+++ b/test/hmouse-drv-tests.el
@@ -3,7 +3,7 @@
 ;; Author:       Mats Lidell <ma...@gnu.org>
 ;;
 ;; Orig-Date:    28-Feb-21 at 22:52:00
-;; Last-Mod:      8-Mar-24 at 16:52:52 by Mats Lidell
+;; Last-Mod:      5-Apr-24 at 23:05:53 by Mats Lidell
 ;;
 ;; SPDX-License-Identifier: GPL-3.0-or-later
 ;;
@@ -149,6 +149,18 @@
         (should (looking-at "emacs-version")))
     (ibtype:delete 'ibtypes::defil-key)))
 
+(ert-deftest hbut-defil-verbatim ()
+  "Verify defil to recognize filenames highlighted using org =verbatim= text."
+  ;; gh#rswgnu/hyperbole/503
+  (defil defil-verbatim "=" "=" ".*" "\\&")
+  (unwind-protect
+      (with-temp-buffer
+        (org-mode)
+        (insert "=~/test.txt=\n")
+        (goto-char 4)
+        (hy-test-helpers:action-key-should-call-hpath:find "~/test.txt"))
+    (ibtype:delete 'ibtypes::defil-verbatim)))
+
 ;; Labels
 (ert-deftest hbut-ib-link-to-file-with-label ()
   (with-temp-buffer

Reply via email to