summaryrefslogtreecommitdiff
path: root/Master/tlpkg/tlperl/lib/Tk/MainWindow.pm
diff options
context:
space:
mode:
Diffstat (limited to 'Master/tlpkg/tlperl/lib/Tk/MainWindow.pm')
-rw-r--r--Master/tlpkg/tlperl/lib/Tk/MainWindow.pm4
1 files changed, 1 insertions, 3 deletions
diff --git a/Master/tlpkg/tlperl/lib/Tk/MainWindow.pm b/Master/tlpkg/tlperl/lib/Tk/MainWindow.pm
index 5dc08d027d7..207b0d1fbb5 100644
--- a/Master/tlpkg/tlperl/lib/Tk/MainWindow.pm
+++ b/Master/tlpkg/tlperl/lib/Tk/MainWindow.pm
@@ -8,7 +8,7 @@ BEGIN { @MainWindow::ISA = 'Tk::MainWindow' }
use strict;
use vars qw($VERSION);
-$VERSION = '4.014'; # was: sprintf '4.%03d', q$Revision: #12 $ =~ /\D(\d+)\s*$/;
+$VERSION = '4.015'; # was: sprintf '4.%03d', q$Revision: #12 $ =~ /\D(\d+)\s*$/;
use Tk::CmdLine;
use Tk qw(catch);
@@ -18,8 +18,6 @@ use Carp;
$| = 1;
-my $pid = $$;
-
my %Windows = ();
sub CreateArgs