[svn:PHP-Sandwich] rev 1030 - PHP-Sandwich/trunk/t

Author: gschlossnagle
Date: Thu Apr 28 13:29:10 2005
New Revision: 1030

Modified:
   PHP-Sandwich/trunk/t/12.t
Log:
embrace Perl idioms as if they were our own


Modified: PHP-Sandwich/trunk/t/12.t
==============================================================================
--- PHP-Sandwich/trunk/t/12.t	(original)
+++ PHP-Sandwich/trunk/t/12.t	Thu Apr 28 13:29:10 2005
@@ -11,5 +11,5 @@
 ok my $p = PHP::Interpreter->new, "Create new PHP interpreter";
 ok $p->eval('function callme() { return Perl::getInstance(); }'),
   'Add a "callme" Perl::getInstance() wrapper';
-ok $p->callme() =~ m/^PHP::Class::PerlObject/,
+ok $p->callme()->isa('PHP::Class::PerlObject'),
   'We should get a perl object back from Perl::getInstance()';