Load and use test-i18n.lisp when uffi:no-i18n is not present in cl:*features*

[clsql.git] / sql / utils.lisp

diff --git a/sql/utils.lisp b/sql/utils.lisp
index 0ead522e403bfff993eb9d4229a73446973f0d43..515dc49359e98d1a5f6e48d97d72b19c3aa6c3a2 100644 (file)
--- a/sql/utils.lisp
+++ b/sql/utils.lisp
@@ -24,7 +24,7 @@
     ;; AllegroCL 8-bit strings don't fail on reading #\no-break_space,
     ;; but can't represent such a character
     ;; CMUCL errors when trying to read #\no-break_space
-    #+lispworks #\no-break-space
+    #+(and lispworks unicode) #\no-break-space
     #+(or (and sbcl sb-unicode) (and allegro ics) (and clisp i18n)
        (and openmcl openmcl-unicode-strings))
     #\no-break_space