tlmgr: add documentation for --w32mode in action path

all modules: add MODULE->module_revision function
tlmgr: if action version is called with -v, also issue the revision of the
  modules used (eg TLPDB->module_revision())


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

1 files changed, 11 insertions, 0 deletions

diff --git a/Master/tlpkg/TeXLive/TLPOBJ.pm b/Master/tlpkg/TeXLive/TLPOBJ.pm
index 87a19e70377..edcbceb279a 100644
--- a/Master/tlpkg/TeXLive/TLPOBJ.pm
+++ b/Master/tlpkg/TeXLive/TLPOBJ.pm
@@ -15,6 +15,17 @@ use TeXLive::TLTREE;
 our $_tmp;
 my $_containerdir;
 
+my $svnrev = '$Revision: 14264 $';
+my $_modulerevision;
+if ($svnrev =~ m/: ([0-9]+) /) {
+  $_modulerevision = $1;
+} else {
+  $_modulerevision = "unknown";
+}
+sub module_revision {
+  return $_modulerevision;
+}
+
 sub new {
   my $class = shift;
   my %params = @_;