From: Kevin M. Rosenberg <kevin@rosenberg.net>
Date: Fri, 6 Oct 2006 19:29:02 +0000 (+0000)
Subject: r11209: fix test
X-Git-Tag: v2006ac.2~46
X-Git-Url: http://git.kpe.io/?p=umlisp.git;a=commitdiff_plain;h=57c4b059639968903aec88e65103a7263cb97535

r11209: fix test
---

diff --git a/tests/basic.lisp b/tests/basic.lisp
index 65b219f..c74e05c 100644
--- 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))  
-      "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)