[svk-commit] r2466 - in branches/i18n-fixes: .
nobody at bestpractical.com
nobody at bestpractical.com
Mon Jul 16 21:37:28 EDT 2007
Author: clkao
Date: Mon Jul 16 21:37:28 2007
New Revision: 2466
Modified:
branches/i18n-fixes/ (props changed)
branches/i18n-fixes/t/api/root.t
Log:
merge down for i18n fixes branch.
Modified: branches/i18n-fixes/t/api/root.t
==============================================================================
--- branches/i18n-fixes/t/api/root.t (original)
+++ branches/i18n-fixes/t/api/root.t Mon Jul 16 21:37:28 2007
@@ -7,7 +7,6 @@
use Scalar::Util qw(reftype blessed);
use Digest::MD5 qw(md5_hex);
-use Class::ISA; # diags only
use Data::Dumper; # diags only
@@ -309,7 +308,7 @@
sub show_isa {
my $class = ref $_[0] || $_[0];
-
+ require Class::ISA;
diag "$class ISA : ".join(" ", Class::ISA::super_path($class));
}
@@ -326,7 +325,7 @@
if ( blessed($what) ) {
diag "methods in ".ref($what).":";
diag " $_" for sort keys(%{ref($what)."::"});
- show_isa($what);
+# show_isa($what);
}
}
else {
More information about the svk-commit
mailing list