summaryrefslogtreecommitdiffstats
path: root/perl-install/standalone/drakperm
diff options
context:
space:
mode:
authorThierry Vignaud <tvignaud@mandriva.org>2005-04-21 11:38:13 +0000
committerThierry Vignaud <tvignaud@mandriva.org>2005-04-21 11:38:13 +0000
commit0de24731d4d351b98250768ce45f170883c998fb (patch)
tree44ecbf68db1eda2ca2b34a59d8dce68d1ac7b61e /perl-install/standalone/drakperm
parent036f4ed425a4a5bdbc20c24bd861746882804172 (diff)
downloaddrakx-backup-do-not-use-0de24731d4d351b98250768ce45f170883c998fb.tar
drakx-backup-do-not-use-0de24731d4d351b98250768ce45f170883c998fb.tar.gz
drakx-backup-do-not-use-0de24731d4d351b98250768ce45f170883c998fb.tar.bz2
drakx-backup-do-not-use-0de24731d4d351b98250768ce45f170883c998fb.tar.xz
drakx-backup-do-not-use-0de24731d4d351b98250768ce45f170883c998fb.zip
(row_setting_dialog) set dialog's title (usability bug)
Diffstat (limited to 'perl-install/standalone/drakperm')
-rwxr-xr-xperl-install/standalone/drakperm9
1 files changed, 5 insertions, 4 deletions
diff --git a/perl-install/standalone/drakperm b/perl-install/standalone/drakperm
index 52ba3c0ad..1ae3883dd 100755
--- a/perl-install/standalone/drakperm
+++ b/perl-install/standalone/drakperm
@@ -55,14 +55,14 @@ load_perms();
my $combo_perm = Gtk2::ComboBox->new_with_strings([ sort(values %perm_l10n) ]);
sub add_callback() {
- row_setting_dialog();
+ row_setting_dialog(N("Add a new rule"));
$modified++;
}
sub edit_callback() {
my (undef, $iter) = $permList->get_selection->get_selected;
return unless $iter;
- row_setting_dialog($iter);
+ row_setting_dialog(N("Edit current rule"), $iter);
}
my @buttons;
@@ -97,7 +97,7 @@ $permList->signal_connect(button_press_event => sub {
my (undef, $event) = @_;
my (undef, $iter) = $permList->get_selection->get_selected;
return unless $iter;
- row_setting_dialog($iter) if $event->type eq '2button-press';
+ row_setting_dialog(N("Edit current rule"), $iter) if $event->type eq '2button-press';
});
@@ -233,10 +233,11 @@ sub load_perms() {
}
sub row_setting_dialog {
- my ($iter) = @_;
+ my ($title, $iter) = @_;
my $dlg = Gtk2::Dialog->new;
$dlg->set_transient_for($w->{real_window}) unless $::isEmbedded;
+ $dlg->set_title($title);
$dlg->set_modal(1);
# $dlg->set_resizable(0);
my $browse = Gtk2::Button->new(N("browse"));