summaryrefslogtreecommitdiffstats
path: root/bin
diff options
context:
space:
mode:
Diffstat (limited to 'bin')
-rwxr-xr-xbin/draknetprofile18
1 files changed, 16 insertions, 2 deletions
diff --git a/bin/draknetprofile b/bin/draknetprofile
index 003bd5b..961474f 100755
--- a/bin/draknetprofile
+++ b/bin/draknetprofile
@@ -190,14 +190,28 @@ sub delete_selected_profile() {
update_profiles();
}
+# create advanced view to configure modules
+my $expander = Gtk2::Expander->new(N("Advanced"));
+$expander->add(gtkpack_(Gtk2::VBox->new,
+ 0, gtkpack_(gtkset_border_width(Gtk2::HBox->new, 1),
+ 0, gtkpack_(gtkset_border_width(Gtk2::VBox->new, 0),
+ 0, gtknew('WrappedLabel', text => N("Select the netprofile modules:")),
+ 0, gtknew('ScrolledWindow', width => 300, height => 150, child => $modules_list),
+ ),
+ ),
+ ),
+ );
+$expander->show_all;
+
+#$expander->signal_connect(activate => sub { $w->shrink_topwindow; });
+
gtkadd($w->{window},
gtknew('VBox', spacing => 5, children => [
$::isEmbedded ? () : (0, Gtk2::Banner->new('draknetprofile', $title)),
0, gtknew('WrappedLabel', text => N("This tool allows you to control network profiles.")),
- 0, gtknew('WrappedLabel', text => N("Select the netprofile modules:")),
- 1, gtknew('ScrolledWindow', width => 300, height => 150, child => $modules_list),
0, gtknew('WrappedLabel', text => N("Select a network profile:")),
1, gtknew('ScrolledWindow', width => 300, height => 150, child => $profiles_list),
+ 0, $expander,
0, gtknew('HButtonBox', children_loose => [
$buttons{activate} = gtknew('Button', text => N("Activate"), clicked => \&set_selected_profile, sensitive => 0),
$buttons{clone} = gtknew('Button', text => N("New"), clicked => \&clone_profile, sensitive => 0),