diff options
| -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, |