* test fixed for non-unix, AddDisk exists only on unix

git-svn-id: trunk@13391 -

tests/webtbs/tw9985a.pp

@@ -15,9 +15,9 @@ begin
     calls...). }
 {$ifdef unix}
   DiskNum := AddDisk('/');
-{$else} 
+{$else}
   { dos/windows/os/2 ... Still needs other cases for other OSes }
-  DiskNum := AddDisk('C:');
+  DiskNum := 3;
 {$endif}
   Writeln(DiskFree(DiskNum), '/', DiskSize(DiskNum));
   if (disksize(3)<>disksize(disknum)) then