summaryrefslogtreecommitdiff
path: root/src/strings.lisp
diff options
context:
space:
mode:
Diffstat (limited to 'src/strings.lisp')
-rw-r--r--src/strings.lisp3
1 files changed, 2 insertions, 1 deletions
diff --git a/src/strings.lisp b/src/strings.lisp
index b11c31c..635762c 100644
--- a/src/strings.lisp
+++ b/src/strings.lisp
@@ -6,6 +6,7 @@
6 (:export 6 (:export
7 :ends-with 7 :ends-with
8 :escape-xml 8 :escape-xml
9 :is-tg-whitespace
9 :is-tg-whitespace-str 10 :is-tg-whitespace-str
10 :lisp->camel-case 11 :lisp->camel-case
11 :lisp->snake-case 12 :lisp->snake-case
@@ -41,7 +42,7 @@
41 (string= gc "Zl") ; Separator, line 42 (string= gc "Zl") ; Separator, line
42 (string= gc "Zp") ; Separator, paragraph 43 (string= gc "Zp") ; Separator, paragraph
43 (string= gc "Cc") ; Other, control 44 (string= gc "Cc") ; Other, control
44 (= (char-code ch) #x2800) ; BRAILLE PATTERN BLANK 45 (= (char-code ch) #x2800) ; BRAILLE PATTERN BLANK
45 ))) 46 )))
46 47
47(defun is-tg-whitespace-str (str) 48(defun is-tg-whitespace-str (str)