Change 34554 by [EMAIL PROTECTED] on 2008/10/21 20:00:16

        Jerry spotted that as a result of change 34483 which upgrades blead to
        Test::Simple 0.82, lib/DB.t is now issuing a warning. His original
        suggestion was ok(!defined ...) - he, Merijn and I independently
        refined this to isnt(..., undef)

Affected files ...

... //depot/perl/lib/DB.t#8 edit

Differences ...

==== //depot/perl/lib/DB.t#8 (text) ====
Index: perl/lib/DB.t
--- perl/lib/DB.t#7~22998~      2004-06-25 15:19:51.000000000 -0700
+++ perl/lib/DB.t       2008-10-21 13:00:16.000000000 -0700
@@ -86,7 +86,7 @@
 # test DB::_clientname()
 is( DB::_clientname('foo=A(1)'), 'foo',
     'DB::_clientname should return refname');
-cmp_ok( DB::_clientname('bar'), 'eq', '',
+is( DB::_clientname('bar'), undef,
         'DB::_clientname should not return non refname');
 
 # test DB::next() and DB::step()
End of Patch.

Reply via email to