From ab2021df43d55ac856036ce0804d39249b4d3a00 Mon Sep 17 00:00:00 2001
From: Norbert Preining <preining@logic.at>
Date: Mon, 18 May 2009 15:11:39 +0000
Subject: auto-remove packages only when update --all is given, not single
 packages updates

git-svn-id: svn://tug.org/texlive/trunk@13205 c570f23f-e606-0410-a88d-b1316a301751
---
 Master/texmf/scripts/texlive/tlmgr.pl | 5 ++++-
 1 file changed, 4 insertions(+), 1 deletion(-)

(limited to 'Master/texmf/scripts')

diff --git a/Master/texmf/scripts/texlive/tlmgr.pl b/Master/texmf/scripts/texlive/tlmgr.pl
index 201c3f34fb0..f6d1e41fd10 100755
--- a/Master/texmf/scripts/texlive/tlmgr.pl
+++ b/Master/texmf/scripts/texlive/tlmgr.pl
@@ -1509,7 +1509,10 @@ sub action_update {
         info("remove $p (removed on server)\n");
       }
     }
-    if (!($opts{"dry-run"} or $opts{"list"} or $opts{"no-remove"})) {
+    # we only remove packages when update --all is called, not on single
+    # package updates
+    if ($opts{"all"} and 
+        !($opts{"dry-run"} or $opts{"list"} or $opts{"no-remove"})) {
       merge_into(\%ret, $localtlmedia->remove_package($p));
       logpackage("remove: $p");
     }
-- 
cgit v1.2.3