Use cl-str instead

This commit is contained in:
Akira Tempaku 2024-10-04 08:44:27 +09:00
parent 53a6a8f50e
commit 7ce7751900
6 changed files with 26 additions and 34 deletions

View file

@ -11,16 +11,7 @@
(testing "escape-html-text-content"
(ok (string= "&<>"'/`="
(escape-html-text-content "&<>\"'/`="))))
(testing "minify"
;; Test with Alpine.js
(ok (string= (minify "{
open: false,
get isOpen() { return this.open },
toggle() { this.open = ! this.open },
}")
"{ open: false, get isOpen() { return this.open }, toggle() { this.open = ! this.open }, }"))))
(escape-html-text-content "&<>\"'/`=")))))
(defgroup fruit
apple banana)