Ver Fonte

* fixed typo

peter há 25 anos atrás
pai
commit
be8e9ae57e
1 ficheiros alterados com 1 adições e 1 exclusões
  1. 1 1
      tests/webtbs/tbug1092.pp

+ 1 - 1
tests/webtbs/tbug1092.pp

@@ -7,7 +7,7 @@ const
   path='c:\';
 {$endif}
 BEGIN
-  if FSearch('tbug1092.pp',path))<>'tbug1092.pp' then
+  if FSearch('tbug1092.pp',path)<>'tbug1092.pp' then
    begin
      writeln('FSearch didn''t find file in the current dir!');
      halt(1);