Update of /project/elephant/cvsroot/elephant/tests In directory common-lisp.net:/tmp/cvs-serv19163/tests
Modified Files: testcollections.lisp Log Message: Bug fix for unicode SBCL
Date: Mon Dec 5 16:08:37 2005 Author: rread
Index: elephant/tests/testcollections.lisp diff -u elephant/tests/testcollections.lisp:1.4 elephant/tests/testcollections.lisp:1.5 --- elephant/tests/testcollections.lisp:1.4 Wed Nov 23 18:51:59 2005 +++ elephant/tests/testcollections.lisp Mon Dec 5 16:08:36 2005 @@ -77,7 +77,7 @@ ;; "key-1". I need to understand this, but don't at present.... (deftest remove-kv (finishes - (with-transaction (:store-controller *store-controller*) (remove-kv "key-1" bt))) + (with-transaction (:store-controller *store-controller*) (remove-kv first-key bt))) t)
(deftest removed