mirror of
https://gitlab.com/freepascal.org/fpc/source.git
synced 2025-11-02 13:19:34 +01:00
* fixed deletefile -> removefile
This commit is contained in:
parent
b4304d6fe1
commit
f2861fb260
@ -69,7 +69,6 @@ type
|
||||
implementation
|
||||
|
||||
uses
|
||||
{ cutils,}
|
||||
verbose, globals;
|
||||
|
||||
const
|
||||
@ -123,7 +122,7 @@ begin
|
||||
f.free;
|
||||
{ Remove if size is 0 }
|
||||
if size=0 then
|
||||
DeleteFile(fn);
|
||||
RemoveFile(fn);
|
||||
opened:=false;
|
||||
size:=0;
|
||||
end;
|
||||
@ -322,7 +321,10 @@ end;
|
||||
end.
|
||||
{
|
||||
$Log$
|
||||
Revision 1.15 2005-04-23 14:15:58 hajny
|
||||
Revision 1.16 2005-04-23 19:42:54 jonas
|
||||
* fixed deletefile -> removefile
|
||||
|
||||
Revision 1.15 2005/04/23 14:15:58 hajny
|
||||
* DeleteFile replaced with RemoveFile to avoid duplicate
|
||||
|
||||
Revision 1.14 2005/02/14 17:13:07 peter
|
||||
|
||||
Loading…
Reference in New Issue
Block a user