summaryrefslogtreecommitdiff
path: root/Master/texmf
diff options
context:
space:
mode:
Diffstat (limited to 'Master/texmf')
-rw-r--r--Master/texmf/scripts/texlive/tlmgrgui/gui-config.pl13
1 files changed, 11 insertions, 2 deletions
diff --git a/Master/texmf/scripts/texlive/tlmgrgui/gui-config.pl b/Master/texmf/scripts/texlive/tlmgrgui/gui-config.pl
index 4f5ccb97d3a..81a910deb28 100644
--- a/Master/texmf/scripts/texlive/tlmgrgui/gui-config.pl
+++ b/Master/texmf/scripts/texlive/tlmgrgui/gui-config.pl
@@ -10,12 +10,21 @@
our $back_config = $back->add("config",-label => ___"config");
$screens{"config"} = $back_config;
+my @fileassocdesc;
+$fileassocdesc[0] = ___"fa_dontchange";
+$fileassocdesc[1] = ___"fa_onlynew";
+$fileassocdesc[2] = ___"fa_all";
+
my %defaults;
for my $key (keys %TeXLive::TLConfig::TLPDBOptionTlmgrName) {
if ($TeXLive::TLConfig::TLPDBOptionType{$key} eq "b") {
$defaults{$key} = ($localtlpdb->option($key) ? ___"yes" : ___"no");
} else {
- $defaults{$key} = $localtlpdb->option($key);
+ if ($key eq "file_assocs") {
+ $defaults{$key} = $fileassocdesc[$localtlpdb->option($key)];
+ } else {
+ $defaults{$key} = $localtlpdb->option($key);
+ }
}
}
@@ -394,7 +403,7 @@ sub select_file_assocs {
-command => sub {
$var = substr($var,0,1);
$localtlpdb->option("file_assocs", $var);
- $defaults{"file_assocs"} = $var;
+ $defaults{"file_assocs"} = $fileassocdesc[$var];
$localtlpdb->save;
$foo->destroy;
}