[libyaml-libyaml-perl] 04/11: Fix warning from undef var in fork child
gregor herrmann
gregoa at debian.org
Fri Mar 18 18:03:31 UTC 2016
This is an automated email from the git hooks/post-receive script.
gregoa pushed a commit to branch gregoa/use-system-yaml
in repository libyaml-libyaml-perl.
commit 98207b08993a1c5949b6cec0bc89597ce837eafe
Author: Ingy döt Net <ingy at ingy.net>
Date: Sat Feb 20 17:58:22 2016 +0000
Fix warning from undef var in fork child
---
test/io-handle.t | 2 +-
1 file changed, 1 insertion(+), 1 deletion(-)
diff --git a/test/io-handle.t b/test/io-handle.t
index df8c578..e0a7ec8 100644
--- a/test/io-handle.t
+++ b/test/io-handle.t
@@ -51,5 +51,5 @@ is length($read_data), length($testdata), 'LoadFile from IO::File read data';
is $read_data, $testdata, 'LoadFile from IO::File read data';
END {
- unlink $file;
+ unlink $file if defined $file; # $file will be undefined in fork child.
}
--
Alioth's /usr/local/bin/git-commit-notice on /srv/git.debian.org/git/pkg-perl/packages/libyaml-libyaml-perl.git
More information about the Pkg-perl-cvs-commits
mailing list