From 4f84d76ed7fbd164a6b2246fc6082b75ec069eae Mon Sep 17 00:00:00 2001
From: Stig Bakken <ssb@php.net>
Date: Thu, 19 Apr 2001 02:33:24 +0000
Subject: [PATCH] * check that error callbacks exist

---
 pear/PEAR.php.in | 6 +++---
 1 file changed, 3 insertions(+), 3 deletions(-)

diff --git a/pear/PEAR.php.in b/pear/PEAR.php.in
index 3c91b576d9..b2556bc329 100644
--- a/pear/PEAR.php.in
+++ b/pear/PEAR.php.in
@@ -212,9 +212,9 @@ class PEAR
 
             case PEAR_ERROR_CALLBACK:
                 $setmode = $mode;
-                if (is_string($options) ||
-                    (is_array($options) && sizeof($options) == 2 &&
-                     is_object($options[0]) && is_string($options[1]))) {
+                if ((is_string($options) && function_exists($options)) ||
+                    (is_array($options) && method_exists(@$options[0], @$options[1])))
+                {
                     $setcallback = $options;
                 } else {
                     trigger_error("invalid error callback", E_USER_WARNING);
-- 
2.50.1