tlmgr: don't load the remote db if tlmgr update is called without arguments

git-svn-id: svn://tug.org/texlive/trunk@19583 c570f23f-e606-0410-a88d-b1316a301751

2 files changed, 10 insertions, 1 deletions

diff --git a/Master/texmf/scripts/texlive/NEWS b/Master/texmf/scripts/texlive/NEWS
index e7c49bfe5c4..8956c6a5d15 100644
--- a/Master/texmf/scripts/texlive/NEWS
+++ b/Master/texmf/scripts/texlive/NEWS
@@ -5,6 +5,7 @@ tlmgr rev NEXT (YYYY-MM-DD)
 
 <li>set LESS='-R' and unset LESSOPEN and LESSPIPE in the environment
     before calling pod2usage.
+<li>don't load the remote db if tlmgr update is called without arguments
 
 tlmgr rev 19414 (TeX Live 2010 Release Version)
 
diff --git a/Master/texmf/scripts/texlive/tlmgr.pl b/Master/texmf/scripts/texlive/tlmgr.pl
index fc08a287f03..5f049a10117 100755
--- a/Master/texmf/scripts/texlive/tlmgr.pl
+++ b/Master/texmf/scripts/texlive/tlmgr.pl
@@ -1810,6 +1810,14 @@ sub action_update {
   init_local_db(1);
   $opts{"no-depends"} = 1 if $opts{"no-depends-at-all"};
 
+  # make a quick check on command line arguments to avoid loading
+  # the remote db uselessly
+  if (!(@ARGV || $opts{"all"} || $opts{"self"})) {
+    tlwarn("tlmgr update: please specify a list of packages, --all or --self.\n");
+    return;
+  }
+    
+
   init_tlmedia();
   info("update: dry run, no changes will be made\n") if $opts{"dry-run"};
 
@@ -1937,7 +1945,7 @@ sub action_update {
     if ($opts{"self"}) {
       info("tlmgr: no updates for tlmgr present.\n");
     } else {
-      tlwarn("tlmgr update: please specify a list of packages or --all.\n");
+      tlwarn("tlmgr update: please specify a list of packages, --all or --self.\n");
     }
   }