(handle_ret_hash): explicit info about the

updmap-sys cmd being run; doc.


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

1 files changed, 8 insertions, 4 deletions

diff --git a/Master/texmf/scripts/texlive/tlmgr2.pl b/Master/texmf/scripts/texlive/tlmgr2.pl
index a5a01f0d027..6aedbc04fb2 100755
--- a/Master/texmf/scripts/texlive/tlmgr2.pl
+++ b/Master/texmf/scripts/texlive/tlmgr2.pl
@@ -383,6 +383,9 @@ sub execute_action {
 # keys in the RET hash.  We return the number of unsuccessful runs, zero
 # if all ok.
 # 
+# If the "map" key is specified, the value may be a reference to a list
+# of map command strings to pass to updmap, e.g., "enable Map=ascii.map".
+# 
 sub handle_ret_hash {
   my (%ret) = @_;
   my $errors = 0;
@@ -394,11 +397,12 @@ sub handle_ret_hash {
 
   if (exists $ret{'map'}) {
     foreach my $m (@{$ret{'map'}}) {
-      info("$m\n");
-      $errors += system("updmap-sys --nomkmap --nohash --$m");
+      my $cmd = "updmap-sys --nomkmap --nohash --$m";
+      info("running $cmd\n");
+      $errors += system($cmd);
     }
-    $errors += system("mktexlsr");
-    $errors += system("updmap-sys");
+    info("running updmap-sys once more\n");
+    $errors += system("updmap-sys"); # runs mktexlsr.
   }
 
   chomp(my $TEXMFSYSVAR = `kpsewhich -var-value=TEXMFSYSVAR`);