More space in path name fixes (Greg)

diff --git a/pear/PEAR/Common.php b/pear/PEAR/Common.php
index 6676f02a9c1c4eef2d14c5bbbe01acb3c23d5e84..a0f3685993eee67bcc247764786ae4f4bc134934 100644 (file)
--- a/pear/PEAR/Common.php
+++ b/pear/PEAR/Common.php
@@ -693,6 +693,9 @@ class PEAR_Common extends PEAR
         }
         $tmpdir = System::mkTemp('-d pear');
         $this->addTempFile($tmpdir);
+        if (!is_array($xml)) {
+            $xml = array($xml);
+        }
         if (!$xml || !$tar->extractList($xml, $tmpdir)) {
             return $this->raiseError('could not extract the package.xml file');
         }

diff --git a/pear/PEAR/Installer.php b/pear/PEAR/Installer.php
index 9f95e25aa6794d05c034707c0ec370cc4d0618bd..6f6deadf65764aab6bc45494209fe113e72fc122 100644 (file)
--- a/pear/PEAR/Installer.php
+++ b/pear/PEAR/Installer.php
@@ -552,7 +552,7 @@ class PEAR_Installer extends PEAR_Common
             $this->log(2, '+ tmp dir created at ' . $tmpdir);
 
             $tar = new Archive_Tar($pkgfile);
-            if (!@$tar->extract($tmpdir)) {
+            if (!@$tar->extract(array($tmpdir))) {
                 return $this->raiseError("unable to unpack $pkgfile");
             }