瀏覽代碼

* Fix error in version sorting

Michaël Van Canneyt 7 月之前
父節點
當前提交
af52e8ce9a
共有 1 個文件被更改,包括 1 次插入1 次删除
  1. 1 1
      tests/utils/tsdb.pp

+ 1 - 1
tests/utils/tsdb.pp

@@ -424,7 +424,7 @@ begin
   Case aType of
   Case aType of
     mtCPU : lSQL:='SELECT TC_ID FROM TESTCPU order by TC_ID';
     mtCPU : lSQL:='SELECT TC_ID FROM TESTCPU order by TC_ID';
     mtOS  : lSQL:='SELECT TO_ID FROM TESTOS order by TO_ID';
     mtOS  : lSQL:='SELECT TO_ID FROM TESTOS order by TO_ID';
-    mtVersion  : lSQL:='SELECT TV_ID FROM TESTVERSION order by TO_ID';
+    mtVersion  : lSQL:='SELECT TV_ID FROM TESTVERSION order by TV_ID';
   end;
   end;
   Qry:=CreateQuery(lSQL);
   Qry:=CreateQuery(lSQL);
   try
   try