(build_list) split it out

1 files changed, 3 insertions, 0 deletions

diff --git a/control-center b/control-center
index 14b3e936..a82a6223 100755
--- a/control-center
+++ b/control-center
@@ -771,6 +771,7 @@ sub clean_list {
 }
 
 my @labels;
+sub build_list {
 foreach (@tree) {
     my ($text, $icon, $help, $subtrees) = @$_;
 
@@ -895,6 +896,8 @@ foreach (@tree) {
 
     add2notebook($banner_notebook, "", Gtk2::Banner->new($icon, $text));
 }
+}
+build_list();
 
 my %icons = (
             );