* Call the PEAR_Registry constructor with the optional parameter

diff --git a/pear/PEAR/Installer.php b/pear/PEAR/Installer.php
index 39fe746a24ca3c42ed180911df27205e96192678..007ba39def2f8b002469f93d6db2a65d4a0513c5 100644 (file)
--- a/pear/PEAR/Installer.php
+++ b/pear/PEAR/Installer.php
@@ -174,7 +174,7 @@ class PEAR_Installer extends PEAR_Common
         // - upgrade       : upgrade existing install
         //
         if (empty($this->registry)) {
-            $this->registry = new PEAR_Registry;
+            $this->registry = new PEAR_Registry($this->phpdir);
         }
         $oldcwd = getcwd();
         $need_download = false;
@@ -327,7 +327,7 @@ class PEAR_Installer extends PEAR_Common
     function uninstall($package)
     {
         if (empty($this->registry)) {
-            $this->registry = new PEAR_Registry;
+            $this->registry = new PEAR_Registry($this->phpdir);
         }
 
         // Delete the files

diff --git a/pear/scripts/pearwin.php b/pear/scripts/pearwin.php
index dcba17b57acaae5a0ad136b2d080217fb6110143..b58a8cbb6ee68fab734a38522a60a0f252b2ecd6 100644 (file)
--- a/pear/scripts/pearwin.php
+++ b/pear/scripts/pearwin.php
@@ -90,7 +90,7 @@ switch ($command) {
         break;
     case 'list-installed':
         include_once 'PEAR/Registry.php';
-        $reg = new PEAR_Registry;
+        $reg = new PEAR_Registry($script_dir);
         $installed = $reg->packageInfo();
         $i = $j = 0;
         print("Installed packages:\n");