branch: externals/hyperbole
commit 0d42a12b1a2a8834939fd94782d491a028efa4ae
Author: Mats Lidell <[email protected]>
Commit: GitHub <[email protected]>
Fix bad should check (#688)
Check that there are at least 1 occurrence of WikiWord in the exported
result.
---
ChangeLog | 6 ++++++
test/hywiki-tests.el | 4 ++--
2 files changed, 8 insertions(+), 2 deletions(-)
diff --git a/ChangeLog b/ChangeLog
index d29788f9d2..85936243ed 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,9 @@
+2025-03-18 Mats Lidell <[email protected]>
+
+* test/hywiki-tests.el
+ (hywiki-tests--published-html-links-to-word-and-section): Fix should
+ check.
+
2025-03-17 Mats Lidell <[email protected]>
* test/hywiki-tests.el (hywiki-tests--add-hywiki-hooks)
diff --git a/test/hywiki-tests.el b/test/hywiki-tests.el
index 6d7a67cec2..32d9703287 100644
--- a/test/hywiki-tests.el
+++ b/test/hywiki-tests.el
@@ -3,7 +3,7 @@
;; Author: Mats Lidell
;;
;; Orig-Date: 18-May-24 at 23:59:48
-;; Last-Mod: 17-Mar-25 at 11:44:34 by Mats Lidell
+;; Last-Mod: 18-Mar-25 at 16:19:07 by Mats Lidell
;;
;; SPDX-License-Identifier: GPL-3.0-or-later
;;
@@ -771,7 +771,7 @@ WikiWord#Bsection-subsection
;; Verify links are generated
(with-current-buffer (find-file-noselect wikipage-html)
;; (First check we even get the wikipage with sections)
- (should (>= 1 (count-matches (regexp-quote "WikiWord") (point-min)
(point-max))))
+ (should (<= 1 (count-matches (regexp-quote "WikiWord") (point-min)
(point-max))))
(should (= 1 (count-matches (regexp-quote "WikiWord#Asection")
(point-min) (point-max))))
(should (= 1 (count-matches (regexp-quote
"WikiWord#Bsection-subsection") (point-min) (point-max))))