Fix unicode errors

1 files changed, 1 insertions, 7 deletions

diff --git a/cook/parse.scm b/cook/parse.scm
index 0fc4744..fd6c70c 100644
--- a/cook/parse.scm
+++ b/cook/parse.scm
@@ -85,12 +85,6 @@ https://github.com/cooklang/spec/blob/main/EBNF.md
     lis))
 
 
-(define whitespace-chars  (char-set-union
-                            (char-set #\space #\x00A0 #\x1680)
-                            (char-set #\x202F #\x205F #\x3000)
-                            (ucs-range->char-set #x2000 #x200B)))
-(define newline-chars     (char-set #\x000A #\x000D #\x0085 #\x2028 #\x2029))
-(define punctuation-chars (char-set #\. #\{ #\})) ;; TODO: do it right
 (define word-chars      (char-set-difference char-set:full
                                              punctuation-chars
                                              newline-chars
@@ -101,7 +95,7 @@ https://github.com/cooklang/spec/blob/main/EBNF.md
                                              (char-set #\@ #\# #\~)))
 (define unit-chars      (char-set-difference text-chars (char-set #\})))
 (define component-chars (char-set-difference text-chars
-                                             (char-set #\{ #\})))
+                                             punctuation-chars))
 (define component-word-chars (char-set-difference component-chars
                                                   newline-chars
                                                   whitespace-chars))