X-Git-Url: https://git.brokenzipper.com/gitweb?a=blobdiff_plain;f=src%2Fdelete.c;h=5d5bd27a9946c6e782b35ad420b19db86bef344f;hb=32c1e664e5f0b5bc4191a334ade93c1b98a90acb;hp=b79321ff319b08c3a2d306e4cda2ca3d8eb45189;hpb=f4935ab55d53a8c6d9581722bf6113164411192b;p=chaz%2Ftar

diff --git a/src/delete.c b/src/delete.c
index b79321f..5d5bd27 100644
--- a/src/delete.c
+++ b/src/delete.c
@@ -383,13 +383,7 @@ delete_archive_members (void)
 
   if (! acting_as_filter && ! _isrmt (archive))
     {
-#if MSDOS
-      int status = write (archive, "", 0);
-#else
-      off_t pos = lseek (archive, (off_t) 0, SEEK_CUR);
-      int status = pos < 0 ? -1 : ftruncate (archive, pos);
-#endif
-      if (status != 0)
+      if (sys_truncate (archive))
 	truncate_warn (archive_name_array[0]);
     }