From cac353a1dbe8d0d6338aa4b94037df131f355538 Mon Sep 17 00:00:00 2001
From: Nathan Bird <nathan@acceleration.net>
Date: Wed, 3 Feb 2010 17:01:47 -0500
Subject: [PATCH] 2 tests for sending non multibyte characters to the database
 and back. Not sure how to handle this on unicode.

---
 tests/test-basic.lisp | 9 +++++++++
 1 file changed, 9 insertions(+)

diff --git a/tests/test-basic.lisp b/tests/test-basic.lisp
index 98e9861..2c13d80 100644
--- a/tests/test-basic.lisp
+++ b/tests/test-basic.lisp
@@ -228,6 +228,15 @@
 	      )))
       nil)
 
+    (deftest :basic/i18n/1
+	(first (query "SELECT 'Iñtërnâtiônàlizætiøn'"
+		      :flatp t :field-names nil))
+      "Iñtërnâtiônàlizætiøn")
+
+    (deftest :basic/i18n/2
+	(first (query "SELECT 'Iñtërnâtiônàližætiøn'"
+		      :flatp t :field-names nil))
+      "Iñtërnâtiônàližætiøn")
     ))
 
 
-- 
2.34.1