diff --git a/ChangeLog b/ChangeLog index 6173485f..1bdb2145 100644 --- a/ChangeLog +++ b/ChangeLog @@ -1,3 +1,8 @@ +2024-04-05 Mats Lidell + +* test/hmouse-drv-tests.el (hbut-defil-verbatim): Add test for reported + issue gh#rswgnu/hyperbole/503. + 2024-04-01 Mats Lidell * test/hpath-tests.el (hpath:prepend-shell-directory-test): diff --git a/test/hmouse-drv-tests.el b/test/hmouse-drv-tests.el index df43e5a1..31042ddb 100644 --- a/test/hmouse-drv-tests.el +++ b/test/hmouse-drv-tests.el @@ -3,7 +3,7 @@ ;; Author: Mats Lidell ;; ;; 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