diff options
| author | Norbert Preining <preining@logic.at> | 2009-08-17 16:56:04 +0000 |
|---|---|---|
| committer | Norbert Preining <preining@logic.at> | 2009-08-17 16:56:04 +0000 |
| commit | 63344514b55dbda0f5d71eae9d14dcfdfa0ea9d8 (patch) | |
| tree | b0311b647266957aab2ccc5ed4c69709c0f67809 /Master | |
| parent | 4493ca830ffb1096518e7563f3be9e462cd56ef6 (diff) | |
fix disabled handling if no local config file is present
git-svn-id: svn://tug.org/texlive/trunk@14731 c570f23f-e606-0410-a88d-b1316a301751
Diffstat (limited to 'Master')
| -rw-r--r-- | Master/tlpkg/TeXLive/TLUtils.pm | 5 |
1 files changed, 3 insertions, 2 deletions
diff --git a/Master/tlpkg/TeXLive/TLUtils.pm b/Master/tlpkg/TeXLive/TLUtils.pm index 5a9568f0a1b..08ab4571272 100644 --- a/Master/tlpkg/TeXLive/TLUtils.pm +++ b/Master/tlpkg/TeXLive/TLUtils.pm @@ -2310,14 +2310,15 @@ duplicates, maybe even error checking. sub get_disabled_local_configs { my $localconf = shift; my $cc = shift; + my @disabled = (); if (-r "$localconf") { open FOO, "<$localconf" or die "strange, -r ok but cannot open $localconf: $!"; my @tmp = <FOO>; close(FOO) || warn("Closing $localconf did not succeed: $!"); - my @disabled = map { if (m/^$cc!(\S+)\s*$/) { $1 } else { }} @tmp; - return @disabled; + @disabled = map { if (m/^$cc!(\S+)\s*$/) { $1 } else { }} @tmp; } + return @disabled; } sub create_fmtutil { |