From: Tomas V.V.Cox <cox@php.net>
Date: Fri, 26 Jul 2002 15:39:16 +0000 (+0000)
Subject: In theory this will fix a problem in Window trying to delete a not closed
X-Git-Tag: dev~153
X-Git-Url: https://granicus.if.org/sourcecode?a=commitdiff_plain;h=bf2a898a5f299f5877614b370da3f2ec40e3efc0;p=php

In theory this will fix a problem in Window trying to delete a not closed
file

#if so, other fixes like that may be needed
---

diff --git a/pear/Archive/Tar.php b/pear/Archive/Tar.php
index 3796ae2451..c2a89c7b3c 100644
--- a/pear/Archive/Tar.php
+++ b/pear/Archive/Tar.php
@@ -880,8 +880,10 @@ class Archive_Tar extends PEAR
       else
         $v_binary_data = @fread($this->_file, 512);
 
-      if (!$this->_readHeader($v_binary_data, $v_header))
+      if (!$this->_readHeader($v_binary_data, $v_header)) {
+        fclose($this->_file);
         return false;
+      }
 
       if ($v_header['filename'] == '')
         continue;