diff options
| author | Karl Berry <karl@freefriends.org> | 2012-05-21 00:15:27 +0000 |
|---|---|---|
| committer | Karl Berry <karl@freefriends.org> | 2012-05-21 00:15:27 +0000 |
| commit | a4c42bfb2337d37da89d789cb8cc226367994e32 (patch) | |
| tree | c3eabdef5d565a4e515d2be0d9d4d0540bde0250 /Master/tlpkg/tlperl/lib/Tk/MainWindow.pm | |
| parent | 8274475057f024d35332ac47c2e2f23ea156e6ed (diff) | |
perl 5.14.2 from siep
git-svn-id: svn://tug.org/texlive/trunk@26525 c570f23f-e606-0410-a88d-b1316a301751
Diffstat (limited to 'Master/tlpkg/tlperl/lib/Tk/MainWindow.pm')
| -rw-r--r-- | Master/tlpkg/tlperl/lib/Tk/MainWindow.pm | 4 |
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 |