summaryrefslogtreecommitdiff
path: root/cpan/Test-Simple/lib/Test/Stream/Util.pm
diff options
context:
space:
mode:
Diffstat (limited to 'cpan/Test-Simple/lib/Test/Stream/Util.pm')
-rw-r--r--cpan/Test-Simple/lib/Test/Stream/Util.pm7
1 files changed, 5 insertions, 2 deletions
diff --git a/cpan/Test-Simple/lib/Test/Stream/Util.pm b/cpan/Test-Simple/lib/Test/Stream/Util.pm
index 60325a3814..79b8087f6a 100644
--- a/cpan/Test-Simple/lib/Test/Stream/Util.pm
+++ b/cpan/Test-Simple/lib/Test/Stream/Util.pm
@@ -165,6 +165,7 @@ sub is_dualvar($) {
# Objects are not dualvars.
return 0 if ref $val;
+ return 0 unless defined $val;
no warnings 'numeric';
my $numval = $val + 0;
@@ -215,6 +216,10 @@ sub translate_filename {
__END__
+=pod
+
+=encoding UTF-8
+
=head1 NAME
Test::Stream::Util - Tools used by Test::Stream and friends.
@@ -276,8 +281,6 @@ specified, encoding.
=back
-=encoding utf8
-
=head1 SOURCE
The source code repository for Test::More can be found at