avoid "Use of uninitialized value $l in concatenation"

2010-01-19 21:20:24 +00:00
parent 469d3ed591
commit 6035a4b044
1 changed files with 1 additions and 1 deletions
--- a/tests/runtests.pl
+++ b/tests/runtests.pl
@@ -2864,7 +2864,7 @@ sub singletest {
            closedir(DIR);
            logmsg "DEBUG: No valgrind files\n" unless(@files);
            my $f;
-            my $l;
+            my $l="";
            foreach $f (@files) {
                logmsg "DEBUG: valgrind file: $f\n";
                if($f =~ /^valgrind$testnum\./) {