From 0b80d600e22ac218a59e1c09967a3caee91b1981 Mon Sep 17 00:00:00 2001 From: Kelly Rauchenberger Date: Sat, 6 Sep 2008 21:16:36 +0000 Subject: Series: Imported XML-RPC libraries Refs #28 --- series/core/trunk/includes/xmlrpc/is_a.php | 47 ++++++++++++++++++++++++++++++ 1 file changed, 47 insertions(+) create mode 100644 series/core/trunk/includes/xmlrpc/is_a.php (limited to 'series/core/trunk/includes/xmlrpc/is_a.php') diff --git a/series/core/trunk/includes/xmlrpc/is_a.php b/series/core/trunk/includes/xmlrpc/is_a.php new file mode 100644 index 0000000..d98db1f --- /dev/null +++ b/series/core/trunk/includes/xmlrpc/is_a.php @@ -0,0 +1,47 @@ + | +// +----------------------------------------------------------------------+ +// +// $Id: is_a.php,v 1.2 2005/11/21 10:57:23 ggiunta Exp $ + + +/** + * Replace function is_a() + * + * @category PHP + * @package PHP_Compat + * @link http://php.net/function.is_a + * @author Aidan Lister + * @version $Revision: 1.2 $ + * @since PHP 4.2.0 + * @require PHP 4.0.0 (user_error) (is_subclass_of) + */ +if (!function_exists('is_a')) { + function is_a($object, $class) + { + if (!is_object($object)) { + return false; + } + + if (get_class($object) == strtolower($class)) { + return true; + } else { + return is_subclass_of($object, $class); + } + } +} + +?> \ No newline at end of file -- cgit 1.4.1