branch: externals/hyperbole
commit a0b40b22ce7aa25b5682239b1aabcb267b514698
Author: Mats Lidell <[email protected]>
Commit: Mats Lidell <[email protected]>
Do not use seq-split, it requires 29.1
---
test/hywiki-tests.el | 6 +++---
1 file changed, 3 insertions(+), 3 deletions(-)
diff --git a/test/hywiki-tests.el b/test/hywiki-tests.el
index 12beadb477..43ae0911b4 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: 20-Jun-24 at 09:28:30 by Mats Lidell
+;; Last-Mod: 20-Jun-24 at 09:30:31 by Mats Lidell
;;
;; SPDX-License-Identifier: GPL-3.0-or-later
;;
@@ -116,7 +116,7 @@
(should (hywiki-maybe-at-wikiword-beginning))
(goto-char 2)
(should-not (hywiki-maybe-at-wikiword-beginning)))
- (dolist (acceptable-char (seq-split "\(\{\<\"'`\t\n\r\f " 1))
+ (dolist (acceptable-char '("(" "{" "<" "\"" "'" "`" " " " " "
" "" " "))
(with-temp-buffer
(insert (format "%sWikiWord" acceptable-char))
(goto-char 2)
@@ -196,7 +196,7 @@
(wiki-page-list nil))
(unwind-protect
(progn
- (dolist (char (seq-split "ABCDEFGHIJ" 1))
+ (dolist (char '("A" "B" "C" "D" "E" "F" "G" "H" "I" "J"))
(push (hywiki-add-page (format "%s%s" basename char))
wiki-page-list))
(should (= 10 (length wiki-page-list)))
(should (= 10 (length (hywiki-get-page-list))))