summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--Master/tlpkg/installer/install-menu-perltk.pl19
1 files changed, 19 insertions, 0 deletions
diff --git a/Master/tlpkg/installer/install-menu-perltk.pl b/Master/tlpkg/installer/install-menu-perltk.pl
index 54c7b527eed..bf82453da32 100644
--- a/Master/tlpkg/installer/install-menu-perltk.pl
+++ b/Master/tlpkg/installer/install-menu-perltk.pl
@@ -500,6 +500,25 @@ Please select a different mirror.', $TeXLive::TLConfig::ReleaseYear, $texlive_re
# install/cancel buttons
my $f3 = $fr->Frame;
+ $f3->Button(
+ -text => __("About"),
+ -command => sub {
+ my $sw = $mw->DialogBox(-title => __("About"),
+ -buttons => [ __("Ok") ]);
+ $sw->add("Label", -text => "
+TeX Live $TeXLive::TLConfig::ReleaseYear
+Please see http://www.tug.org/texlive
+GUI installer
+Copyright 2009-$TeXLive::TLConfig::ReleaseYear The TeX Live Team
+Licensed under the GNU General Public License version 2 or higher
+
+In case of problems, please contact: texlive\@tug.org"
+ )->pack(-ipadx => "2m", -ipady => "2m");
+ $sw->Show;
+ })->pack(-side => 'left', -padx => "2m", -pady => "2m");
+
+
+
$installbutton = $f3->Button(
-text => __("Install TeX Live"),
-command => sub { installation_window(); });