diff --git a/runewidth/eastasian/locale.scm b/runewidth/eastasian/locale.scm index 4eb0c1e..abb5dcb 100644 --- a/runewidth/eastasian/locale.scm +++ b/runewidth/eastasian/locale.scm @@ -52,9 +52,6 @@ (match:substring locale-match 2))) locale))) - (pk locale) - (pk charset) - (and (not (regexp-exec c-or-posix-regexp locale)) (not (string-suffix? "@cjk_narrow" charset)) @@ -63,9 +60,6 @@ (when index-@ (set! charset (substring charset 0 index-@))) - (pk charset) - (pk locale) - (and (member charset wide-locales) (or (not (eq? #\u (string-ref charset 0)))