From b4eb58d9e0299d963626970dc7d85917199ff71e Mon Sep 17 00:00:00 2001 From: Norbert Preining Date: Wed, 29 Sep 2010 00:51:38 +0000 Subject: fix wrong interpretation of autoclean value 0 in tlpdb git-svn-id: svn://tug.org/texlive/trunk@19940 c570f23f-e606-0410-a88d-b1316a301751 --- Master/texmf/scripts/texlive/tlmgr.pl | 5 +++-- 1 file changed, 3 insertions(+), 2 deletions(-) diff --git a/Master/texmf/scripts/texlive/tlmgr.pl b/Master/texmf/scripts/texlive/tlmgr.pl index c6a5b182520..3360127a342 100755 --- a/Master/texmf/scripts/texlive/tlmgr.pl +++ b/Master/texmf/scripts/texlive/tlmgr.pl @@ -1351,12 +1351,13 @@ sub action_backup { if ($clean_mode) { if ($opts{"clean"} == -99) { # we need to check the tlpdb - $opts{"clean"} = $localtlpdb->option("autobackup"); - if (!$opts{"clean"}) { + my $tlpdb_option = $localtlpdb->option("autobackup"); + if (!defined($tlpdb_option)) { tlwarn ("--clean given without an argument, but no default clean\n"); tlwarn ("mode specified in the tlpdb, terminating.\n"); exit 1; } + $opts{"clean"} = $tlpdb_option; } # now $opts{"clean"} is something, but maybe not a number, check for # validity -- cgit v1.2.3