[wellwell-devel] [wellwell] Properly initialize $cur_level variable in WellWell::Menu in order to avoid

Stefan Hornburg wellwell-devel at rt.icdevgroup.org
Wed Sep 15 10:44:52 UTC 2010


commit 2a1a47169667827ca9ec26f90193e90fea5fdc29
Author: Stefan Hornburg (Racke) <racke at linuxia.de>
Date:   Sat Sep 11 13:36:20 2010 +0200

    Properly initialize $cur_level variable in WellWell::Menu in order to avoid
    Perl warnings.

 lib/WellWell/Menu.pm |    3 +++
 1 files changed, 3 insertions(+), 0 deletions(-)
---
diff --git a/lib/WellWell/Menu.pm b/lib/WellWell/Menu.pm
index abf6a19..e54fd40 100644
--- a/lib/WellWell/Menu.pm
+++ b/lib/WellWell/Menu.pm
@@ -81,6 +81,9 @@ sub build_entries {
 		$entries_ref = sort_tree_entries($entries_ref);
 		$cur_level = $entries_ref->[0]->{level};
 	}
+	else {
+		$cur_level = 0;
+	}
 
 	for (my $i = 0; $i < @$entries_ref; $i++) {
 		$ref = $entries_ref->[$i];



More information about the wellwell-devel mailing list