texlive[45792] Master/texmf-dist/scripts/texlive/tlmgr.pl: tlmgr

[commits+preining at tug.org]

Revision: 45792
          http://tug.org/svn/texlive?view=revision&revision=45792
Author:   preining
Date:     2017-11-14 07:51:37 +0100 (Tue, 14 Nov 2017)
Log Message:
-----------
tlmgr option: allow tlpdb internal names in addition to old/tlmgr names

Modified Paths:
--------------
    trunk/Master/texmf-dist/scripts/texlive/tlmgr.pl

Modified: trunk/Master/texmf-dist/scripts/texlive/tlmgr.pl
===================================================================
--- trunk/Master/texmf-dist/scripts/texlive/tlmgr.pl	2017-11-14 01:55:52 UTC (rev 45791)
+++ trunk/Master/texmf-dist/scripts/texlive/tlmgr.pl	2017-11-14 06:51:37 UTC (rev 45792)
@@ -4442,7 +4442,7 @@
     }
     my $found = 0;
     for my $opt (keys %TLPDBOptions) {
-      if ($what eq $TLPDBOptions{$opt}->[2]) {
+      if (($what eq $TLPDBOptions{$opt}->[2]) || ($what eq $opt)) {
         $found = 1;
         # the option argument matches the name
         my $val = shift @ARGV;