[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