From 5adb1d65482baea9ee996ad41cbc4d3223b37ff6 Mon Sep 17 00:00:00 2001 From: Thierry Vignaud Date: Fri, 19 Dec 2003 15:31:19 +0000 Subject: fix layout: - let it fit when embedded - move ok/cancel buttons out of the frame (thus nicely separate them) --- perl-install/standalone/drakperm | 31 ++++++++++++++++--------------- 1 file changed, 16 insertions(+), 15 deletions(-) (limited to 'perl-install/standalone/drakperm') diff --git a/perl-install/standalone/drakperm b/perl-install/standalone/drakperm index 60204651e..9abba28b6 100755 --- a/perl-install/standalone/drakperm +++ b/perl-install/standalone/drakperm @@ -106,12 +106,12 @@ my $tips = new Gtk2::Tooltips; $W->add(gtkpack_(Gtk2::VBox->new(0,5), 0, Gtk2::WrappedLabel->new(N("Drakperm is used to see files to use in order to fix permissions, owners, and groups via msec.\nYou can also edit your own rules which will owerwrite the default rules.")), 1, gtkadd(Gtk2::Frame->new, - gtkpack_(Gtk2::VBox->new(0,5), - 0, gtkadd(Gtk2::HBox->new(0,5), - Gtk2::Label->new(N("The current security level is %s + gtkpack_(Gtk2::VBox->new, + 0, Gtk2::WrappedLabel->new(N("The current security level is %s. Select permissions to see/edit", $level)), - $combo_perm - ), + 0, gtkpack_(gtkset_layout(Gtk2::HButtonBox->new, 'spread'), + 0, $combo_perm, + ), 1, create_scrolled_window($permList), 0, my $up_down_box = gtkadd(Gtk2::HBox->new(0, 5), @buttons = map { @@ -123,16 +123,17 @@ Select permissions to see/edit", $level)), [ N("Add a rule"), N("Add a new rule at the end"), \&add_callback ], [ N("Delete"), N("Delete selected rule"), \&del_callback ], [ N("Edit"), N("Edit current rule"), \&edit_callback ])), - 0, gtkpack(Gtk2::HButtonBox->new, - gtksignal_connect(Gtk2::Button->new(N("Help")), clicked => - sub { unless (fork()) { exec("drakhelp --id drakperm") } }), - Gtk2::Label->new(""), - gtksignal_connect(Gtk2::Button->new(N("Cancel")), clicked => sub { ugtk2->exit }), - gtksignal_connect(Gtk2::Button->new(N("Ok")), clicked => \&save_perm), - ) - ) - ) - ) + 0, Gtk2::VBox->new, + ), + ), + 0, gtkpack(Gtk2::HButtonBox->new, + gtksignal_connect(Gtk2::Button->new(N("Help")), clicked => + sub { unless (fork()) { exec("drakhelp --id drakperm") } }), + Gtk2::Label->new(""), + gtksignal_connect(Gtk2::Button->new(N("Cancel")), clicked => sub { ugtk2->exit }), + gtksignal_connect(Gtk2::Button->new(N("Ok")), clicked => \&save_perm), + ) + ) ); $W->show_all; $w->{rwindow}->set_position('center') unless $::isEmbedded; -- cgit v1.2.1