Merge pull request #8 from albert-github/feature/bug_uninit_var2

jordan2175 · web-flow · commit 8619a295a354 · 2019-06-18T15:01:59.000+02:00
Uninitialized variable
diff --git a/lib/Doxygen/Filter/Perl.pm b/lib/Doxygen/Filter/Perl.pm
@@ -593,7 +593,11 @@ sub _PrintClassBlock
         my $count = 0;
         foreach my $inherit (@{$classDef->{inherits}})
         {
-            print(($count++ == 0 ? ": " : ", ")." public ::".$inherit);
+            if (defined($inherit))
+            {
+                print(($count++ == 0 ? ": " : ", ")." public ::".$inherit);
+            }
+
         }
     }
     print "\n{\n";

Original file line number	Diff line number	Diff line change
`@@ -593,7 +593,11 @@ sub _PrintClassBlock`
`593`	`593`	`my $count = 0;`
`594`	`594`	`foreach my $inherit (@{$classDef->{inherits}})`
`595`	`595`	`{`
`596`		`- print(($count++ == 0 ? ": " : ", ")." public ::".$inherit);`
	`596`	`+ if (defined($inherit))`
	`597`	`+ {`
	`598`	`+ print(($count++ == 0 ? ": " : ", ")." public ::".$inherit);`
	`599`	`+ }`
	`600`	`+`
`597`	`601`	`}`
`598`	`602`	`}`
`599`	`603`	`print "\n{\n";`