r11209: fix test

diff --git a/tests/basic.lisp b/tests/basic.lisp
index 65b219fd52eecf8737df80a11d6c16cf98c01418..c74e05ca9ac8dce27d0e8c6b54c410d994233e7e 100644 (file)
--- a/tests/basic.lisp
+++ b/tests/basic.lisp
@@ -68,7 +68,7 @@
     
     (deftest :qrystr/8e (umlisp::query-string-eval 'mrdef '(sab def) 2 'cui 39 :lrl 'ksrl
                         :order '(cui asc def desc))  
     
     (deftest :qrystr/8e (umlisp::query-string-eval 'mrdef '(sab def) 2 'cui 39 :lrl 'ksrl
                         :order '(cui asc def desc))  

-      "SELECT SAB,DEF FROM MRDEF WHERE CUI='39' AND SRL<=2 ORDER BY CUI asc,DEF desc")
+      "SELECT SAB,DEF FROM MRDEF WHERE CUI='39' AND KSRL<=2 ORDER BY CUI asc,DEF desc")

     
     (deftest :ui/1 (umlisp::parse-cui "C0002341") 2341)
     (deftest :ui/2 (umlisp::parse-lui "L0002341") 2341)
     
     (deftest :ui/1 (umlisp::parse-cui "C0002341") 2341)
     (deftest :ui/2 (umlisp::parse-lui "L0002341") 2341)