From 06c98b477b7828280e94fc97322312e0d1fbf857 Mon Sep 17 00:00:00 2001
From: Vincent Blavet <vblavet@php.net>
Date: Thu, 24 Jan 2002 08:24:24 +0000
Subject: [PATCH] * Call the PEAR_Registry constructor with the optional
 parameter

---
 pear/PEAR/Installer.php  | 4 ++--
 pear/scripts/pearwin.php | 2 +-
 2 files changed, 3 insertions(+), 3 deletions(-)

diff --git a/pear/PEAR/Installer.php b/pear/PEAR/Installer.php
index 39fe746a24..007ba39def 100644
--- 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 dcba17b57a..b58a8cbb6e 100644
--- 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");
-- 
2.40.0