diff options
-rw-r--r-- | Master/texmf/scripts/texlive/tlmgrgui.pl | 12 |
1 files changed, 11 insertions, 1 deletions
diff --git a/Master/texmf/scripts/texlive/tlmgrgui.pl b/Master/texmf/scripts/texlive/tlmgrgui.pl index db6567aa209..5d6e952ea58 100644 --- a/Master/texmf/scripts/texlive/tlmgrgui.pl +++ b/Master/texmf/scripts/texlive/tlmgrgui.pl @@ -16,6 +16,15 @@ $^W = 1; use strict; +my $svnrev = '$Revision$'; +my $datrev = '$Date$'; +my $tlmgrguirevision; +if ($svnrev =~ m/: ([0-9]+) /) { + $tlmgrguirevision = $1; +} else { + $tlmgrguirevision = "unknown"; +} + use Tk; use Tk::Dialog; use Tk::Adjuster; @@ -530,7 +539,8 @@ sub setup_menu_system { my $sw = $mw->DialogBox(-title => __("About"), -buttons => [ __("Ok") ]); $sw->add("Label", -text => "TeX Live Manager (GUIv2) -$tlmgrrev +tlmgr.pl: $tlmgrrev +tlmgrgui.pl: $tlmgrguirev Copyright 2009 Norbert Preining Licensed under the GNU General Public License version 2 or higher |