scratch/sqlite fb43bc5: Test more mixes of raw bytes/chars

[Lars Ingebrigtsen]

branch: scratch/sqlite
commit fb43bc54ee8c044a53387c94e7b0935594611cf1
Author: Lars Ingebrigtsen <larsi@gnus.org>
Commit: Lars Ingebrigtsen <larsi@gnus.org>

    Test more mixes of raw bytes/chars
---
 test/src/sqlite-tests.el | 7 +++++--
 1 file changed, 5 insertions(+), 2 deletions(-)

diff --git a/test/src/sqlite-tests.el b/test/src/sqlite-tests.el
index 96e72df..b6f2626 100644
--- a/test/src/sqlite-tests.el
+++ b/test/src/sqlite-tests.el
@@ -91,15 +91,18 @@
 
 (ert-deftest sqlite-chars ()
   (skip-unless (sqlite-available-p))
-  (let ((db (sqlite-open)))
+  (let (db)
+    (setq db (sqlite-open))
     (sqlite-execute
      db "create table if not exists test2 (col1 text, col2 integer)")
     (sqlite-execute
      db "insert into test2 (col1, col2) values ('fóo', 3)")
     (sqlite-execute
+     db "insert into test2 (col1, col2) values ('fó‚o', 3)")
+    (sqlite-execute
      db "insert into test2 (col1, col2) values ('f‚o', 4)")
     (should
      (equal (sqlite-select db "select * from test2")
-            '(("col1" "col2") ("fóo" 3) ("f‚o" 4))))))
+            '(("col1" "col2") ("fóo" 3) ("fó‚o" 3) ("f‚o" 4))))))
 
 ;;; sqlite-tests.el ends here