diff options
author | Norbert Preining <preining@logic.at> | 2008-07-27 21:34:37 +0000 |
---|---|---|
committer | Norbert Preining <preining@logic.at> | 2008-07-27 21:34:37 +0000 |
commit | 3288dd73f06b1e9e456433e161226923c4400d10 (patch) | |
tree | 03dcfa6c9ed4bb94658c1eff3d292c3a0356782e /Master/texmf/scripts | |
parent | 7aeaf5c135f604e1fe30c5c6ecc2b11b54f01e67 (diff) |
tlmgr.pl: if update --all has been called, no package updated, and the
installation source is NOT the net, give a warning about the location...
git-svn-id: svn://tug.org/texlive/trunk@9822 c570f23f-e606-0410-a88d-b1316a301751
Diffstat (limited to 'Master/texmf/scripts')
-rwxr-xr-x | Master/texmf/scripts/texlive/tlmgr.pl | 10 |
1 files changed, 10 insertions, 0 deletions
diff --git a/Master/texmf/scripts/texlive/tlmgr.pl b/Master/texmf/scripts/texlive/tlmgr.pl index 4e7a6704205..b3ad055394b 100755 --- a/Master/texmf/scripts/texlive/tlmgr.pl +++ b/Master/texmf/scripts/texlive/tlmgr.pl @@ -612,6 +612,7 @@ sub action_update { printf "tlmgr update takes either a list of packages or --all\n"; } my $updater_started = 0; + my $nrupdated = 0; foreach my $pkg (@todo) { next if ($pkg =~ m/^00texlive/); my $tlp = $localtlpdb->get_package($pkg); @@ -627,6 +628,7 @@ sub action_update { } my $mediarev = $mediatlp->revision; if ($rev < $mediarev) { + $nrupdated++; if ($opt_list) { print "$pkg: local: $rev, source: $mediarev\n"; } elsif ($opt_dry) { @@ -725,6 +727,14 @@ EOF ); tlwarn("UPDATER has been created, please execute tlpkg\\installer\\updater.bat\n"); } + if (($nrupdated == 0) && ($tlmediasrc->media ne "NET") && $opt_all) { + # for all but net updates we warn if nothing is updated + tlwarn("\nYour installation is set up to look on the disk for updates.\n"); + tlwarn("If you want to install from the Internet for this one time only, run\n"); + tlwarn(" tlmgr -location $TeXLiveURL\n"); + tlwarn("\nIf you want to change the default for all future updates, run\n"); + tlwarn(" tlmgr option location $TeXLiveURL\n\n"); + } return(\%ret); } |