Browse Source

* fix filtering

git-svn-id: trunk@5766 -
peter 18 years ago
parent
commit
19b4964df3
1 changed files with 3 additions and 3 deletions
  1. 3 3
      tests/utils/testsuite/utests.pp

+ 3 - 3
tests/utils/testsuite/utests.pp

@@ -363,11 +363,11 @@ Var
 
 
 begin
 begin
    S:='';
    S:='';
-   If (FCPU<>'') and (FCPU<>'0') then
+   If (FCPU<>'') and (GetCPUName(FCPU)<>'All') then
      S:=S+' AND (TU_CPU_FK='+FCPU+')';
      S:=S+' AND (TU_CPU_FK='+FCPU+')';
-   If (FVersion<>'') and (FVersion<>'0')  then
+   If (FVersion<>'') and (GetVersionName(FVersion)<>'All')  then
      S:=S+' AND (TU_VERSION_FK='+FVERSION+')';
      S:=S+' AND (TU_VERSION_FK='+FVERSION+')';
-   if (FOS<>'') and (FOS<>'0') then
+   if (FOS<>'') and (GetOSName(FOS)<>'All') then
      S:=S+' AND (TU_OS_FK='+FOS+')';
      S:=S+' AND (TU_OS_FK='+FOS+')';
    If (Round(FDate)<>0) then
    If (Round(FDate)<>0) then
      S:=S+' AND (TU_DATE>="'+FormatDateTime('YYYY/MM/DD',FDate)+'")'
      S:=S+' AND (TU_DATE>="'+FormatDateTime('YYYY/MM/DD',FDate)+'")'