diff options
Diffstat (limited to 'net/cvsup/files/patch-ac')
-rw-r--r-- | net/cvsup/files/patch-ac | 51 |
1 files changed, 0 insertions, 51 deletions
diff --git a/net/cvsup/files/patch-ac b/net/cvsup/files/patch-ac deleted file mode 100644 index 817a3747b159..000000000000 --- a/net/cvsup/files/patch-ac +++ /dev/null @@ -1,51 +0,0 @@ -Index: client/src/Updater.m3 -=================================================================== -RCS file: /home/cvsupcvs/cvsup/client/src/Updater.m3,v -retrieving revision 1.91 -diff -u -r1.91 Updater.m3 ---- client/src/Updater.m3 1999/08/13 19:51:29 1.91 -+++ client/src/Updater.m3 2001/05/26 23:11:39 -@@ -712,7 +712,7 @@ - IF SupFileRec.Option.KeepBadFiles IN sfr.options THEN - Warn(self, "Bad version saved in " & tempPath); - ELSE -- DeleteFile(tempPath); -+ DeleteFile(self, tempPath); - END; - END; - END UpdateFile; -@@ -1188,7 +1188,7 @@ - IF NOT SupFileRec.Option.CheckoutMode IN sfr.options THEN - (* Try the attic. *) - WITH atticName = SupMisc.AtticName(destPath) DO -- DeleteFile(atticName); -+ DeleteFile(self, atticName); - (* We always delete the Attic directory when it becomes empty. - FIXME - Is that the right thing to do?. *) - TRY -@@ -1196,7 +1196,7 @@ - EXCEPT OSError.E => (* Ignore. *) END; - END; - END; -- DeleteFile(destPath); -+ DeleteFile(self, destPath); - IF SupFileRec.Option.CheckoutMode IN sfr.options - OR NOT self.proto.v.dirsAreExplicit THEN - (* Delete the directory automatically if it is now empty. *) -@@ -1231,14 +1231,13 @@ - END; - END MakeDirectories; - --PROCEDURE DeleteFile(path: Pathname.T) -- RAISES {Error} = -+PROCEDURE DeleteFile(self: T; path: Pathname.T) = - BEGIN - TRY - FileAttr.Delete(path); - EXCEPT OSError.E(l) => - IF l.head # EnoentAtom THEN -- RAISE Error("Cannot delete \"" & path & "\": " & -+ Warn(self, "Cannot delete \"" & path & "\": " & - ErrMsg.StrError(l)); - END; - END; |