summaryrefslogtreecommitdiff
path: root/Master/tlpkg/TeXLive/TLPSRC.pm
diff options
context:
space:
mode:
authorNorbert Preining <preining@logic.at>2009-08-06 13:18:16 +0000
committerNorbert Preining <preining@logic.at>2009-08-06 13:18:16 +0000
commitae1173ec6fdb5824665e5f5917f725549147df85 (patch)
tree5fea82e16a44ace3b4d71894fe84206347da7fc2 /Master/tlpkg/TeXLive/TLPSRC.pm
parent523a3a5a8496779171b512dc7787aa75d8864e71 (diff)
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
Diffstat (limited to 'Master/tlpkg/TeXLive/TLPSRC.pm')
-rw-r--r--Master/tlpkg/TeXLive/TLPSRC.pm11
1 files changed, 11 insertions, 0 deletions
diff --git a/Master/tlpkg/TeXLive/TLPSRC.pm b/Master/tlpkg/TeXLive/TLPSRC.pm
index 7894ffbfaa6..3bf13e20e51 100644
--- a/Master/tlpkg/TeXLive/TLPSRC.pm
+++ b/Master/tlpkg/TeXLive/TLPSRC.pm
@@ -16,6 +16,17 @@ use TeXLive::TLTREE;
my $_tmp;
my %autopatterns; # computed once internally
+my $svnrev = '$Revision: 14408 $';
+my $_modulerevision;
+if ($svnrev =~ m/: ([0-9]+) /) {
+ $_modulerevision = $1;
+} else {
+ $_modulerevision = "unknown";
+}
+sub module_revision {
+ return $_modulerevision;
+}
+
sub new
{
my $class = shift;