install-tl --version -v now also gives the version number of the modules

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

1 files changed, 10 insertions, 0 deletions

diff --git a/Master/install-tl b/Master/install-tl
index 0a285b8f724..12f092ac119 100755
--- a/Master/install-tl
+++ b/Master/install-tl
@@ -242,6 +242,15 @@ if ($opt_version) {
     print $rel_tl[$#rel_tl];
     close (REL_TL);
   }
+  if ($::opt_verbosity > 0) {
+    print "Revision of modules:";
+    print "\nTLConfig: " . TeXLive::TLConfig->module_revision();
+    print "\nTLUtils:  " . TeXLive::TLUtils->module_revision();
+    print "\nTLPOBJ:   " . TeXLive::TLPOBJ->module_revision();
+    print "\nTLPDB:    " . TeXLive::TLPDB->module_revision();
+    print "\nTLWinGoo: " . TeXLive::TLWinGoo->module_revision() if win32();
+    print "\n";
+  }
   exit 0;
 }
 
@@ -1900,6 +1909,7 @@ Display this help and exit.
 =item B<--version>, B<-version>
 
 Output version information and exit.
+If C<-v> has been given the revisions of the used modules are reported, too.
 
 =back