branch: externals/hyperbole
commit 25ad337b6be9ebe59ec0925a4ab0095ad7743dc2
Author: Mats Lidell <[email protected]>
Commit: GitHub <[email protected]>
Add hyp-manual test (#586)
---
ChangeLog | 4 ++++
test/hibtypes-tests.el | 16 +++++++++++++++-
2 files changed, 19 insertions(+), 1 deletion(-)
diff --git a/ChangeLog b/ChangeLog
index 75ff4808a6..10f437052d 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,7 @@
+2024-09-08 Mats Lidell <[email protected]>
+
+* test/hibtypes-tests.el (ibtypes::hyp-manual-test): Add test.
+
2024-09-07 Mats Lidell <[email protected]>
* Makefile (docker, docker-run): Use "--rm" option so the short lived
diff --git a/test/hibtypes-tests.el b/test/hibtypes-tests.el
index acac882990..3998c5bd73 100644
--- a/test/hibtypes-tests.el
+++ b/test/hibtypes-tests.el
@@ -3,7 +3,7 @@
;; Author: Mats Lidell <[email protected]>
;;
;; Orig-Date: 20-Feb-21 at 23:45:00
-;; Last-Mod: 10-Aug-24 at 23:27:05 by Mats Lidell
+;; Last-Mod: 8-Sep-24 at 00:48:52 by Mats Lidell
;;
;; SPDX-License-Identifier: GPL-3.0-or-later
;;
@@ -190,6 +190,20 @@
(buffer-live-p visited-buf))
(kill-buffer visited-buf)))))
+;; hyp-manual
+(ert-deftest ibtypes::hyp-manual-test ()
+ "Verify ibut for Hyperbole manual file path."
+ (with-temp-buffer
+ (insert "\"hyperbole.html#Smart Keys\"")
+ (goto-char 2)
+ (mocklet (((actypes::www-url (concat "file://" (expand-file-name
"hyperbole.html" (hpath:expand "${hyperb:dir}/man/")) "#Smart-Keys")) => t))
+ (ibtypes::hyp-manual)))
+ (with-temp-buffer
+ (insert "\"hyperbole.texi#Smart Keys\"")
+ (goto-char 2)
+ (mocklet (((actypes::link-to-file (concat (expand-file-name
"hyperbole.texi" (hpath:expand "${hyperb:dir}/man/")) "#Smart Keys")) => t))
+ (ibtypes::hyp-manual))))
+
;; markdown
; Can't find out how to use the markdown-internal-link ibtypes!?
