ソースを参照

* fixed deletefile -> removefile

Jonas Maebe 20 年 前
コミット
f2861fb260
1 ファイル変更5 行追加3 行削除
  1. 5 3
      compiler/owbase.pas

+ 5 - 3
compiler/owbase.pas

@@ -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