diff options
author | Norbert Preining <preining@logic.at> | 2008-12-26 20:45:23 +0000 |
---|---|---|
committer | Norbert Preining <preining@logic.at> | 2008-12-26 20:45:23 +0000 |
commit | 8485f9ffd454701dc909243291c93ee84a43ea4c (patch) | |
tree | 8fde89231effd868f4057c3c60e4b96ba72b7578 /Master | |
parent | aa1698c6f48ee300b8f3fb4a0be0a9f0eb98ea19 (diff) |
pop up a gui warning window about not implemented for autoback and backupdir
git-svn-id: svn://tug.org/texlive/trunk@11730 c570f23f-e606-0410-a88d-b1316a301751
Diffstat (limited to 'Master')
-rw-r--r-- | Master/texmf/scripts/texlive/tlmgrgui/gui-config2.pl | 12 |
1 files changed, 10 insertions, 2 deletions
diff --git a/Master/texmf/scripts/texlive/tlmgrgui/gui-config2.pl b/Master/texmf/scripts/texlive/tlmgrgui/gui-config2.pl index 80e62bff6be..276c02a2bfb 100644 --- a/Master/texmf/scripts/texlive/tlmgrgui/gui-config2.pl +++ b/Master/texmf/scripts/texlive/tlmgrgui/gui-config2.pl @@ -45,12 +45,20 @@ my $back_config_set_r4 = $back_config_set->Button(-text => ___"toggle", my $back_config_set_l5 = $back_config_set->Label(-text => ___"backupdir", -anchor => "w"); my $back_config_set_m5 = $back_config_set->Label(-textvariable => \$default_backupdir); my $back_config_set_r5 = $back_config_set->Button(-text => ___"change", - -command => sub { info("Not implemented!\n"); return; change_backupdir(); }); + -command => sub { + $mw->Dialog(-title => "not implemented", + -text => "changing backupdir setting not implemented", + -buttons => [ "ok" ])->Show; + info("Not implemented!\n"); return; change_backupdir(); }); my $back_config_set_l6 = $back_config_set->Label(-text => ___"autobackup", -anchor => "w"); my $back_config_set_m6 = $back_config_set->Label(-textvariable => \$default_autobackup); my $back_config_set_r6 = $back_config_set->Button(-text => ___"change", - -command => sub { info("Not implemented!\n"); return; change_autobackup(); }); + -command => sub { + $mw->Dialog(-title => "not implemented", + -text => "changing autobackup setting not implemented", + -buttons => [ "ok" ])->Show; + info("Not implemented!\n"); return; change_autobackup(); }); $back_config_set_l1->grid( $back_config_set_m1, $back_config_set_r1, |