File tree Expand file tree Collapse file tree 5 files changed +5
-6
lines changed Expand file tree Collapse file tree 5 files changed +5
-6
lines changed Original file line number Diff line number Diff line change 1
1
package Tk::Event ;
2
2
use vars qw( $VERSION $XS_VERSION @EXPORT_OK) ;
3
3
END { CleanupGlue() }
4
- $VERSION = ' 4.024 ' ; # was: sprintf '4.%03d', q$Revision: #15 $ =~ /\D(\d+)\s*$/ ;
4
+ $VERSION = ' 4.025 ' ;
5
5
$XS_VERSION = ' 804.030_502' ;
6
6
$XS_VERSION =~ s { _} {} ;
7
7
use base qw( Exporter) ;
Original file line number Diff line number Diff line change 1
1
package Tk::IO ;
2
2
use strict;
3
3
use vars qw( $VERSION) ;
4
- $VERSION = ' 4.005 ' ; # $Id: //depot/Tkutf8/IO/IO.pm#4 $
4
+ $VERSION = ' 4.006 ' ;
5
5
6
6
require 5.002;
7
7
use Tk::Event qw( $XS_VERSION) ;
Original file line number Diff line number Diff line change @@ -9,7 +9,7 @@ use Carp;
9
9
use File::Basename;
10
10
11
11
use vars qw( $VERSION) ;
12
- $VERSION = ' 4.024 ' ;
12
+ $VERSION = ' 4.025 ' ;
13
13
14
14
# warn __FILE__." $VERSION\n";
15
15
Original file line number Diff line number Diff line change @@ -11,8 +11,7 @@ $SIG{__DIE__} = \&Carp::confess;
11
11
12
12
13
13
use vars qw( $VERSION) ;
14
- # $VERSION = sprintf '4.%03d', q$Revision: #13 $ =~ /\D(\d+)\s*$/;
15
- $VERSION = ' 4.014' ;
14
+ $VERSION = ' 4.015' ;
16
15
17
16
sub scan_file ;
18
17
Original file line number Diff line number Diff line change @@ -5,7 +5,7 @@ package Tk::Table;
5
5
use strict;
6
6
7
7
use vars qw( $VERSION) ;
8
- $VERSION = ' 4.015 ' ; # was: sprintf '4.%03d', q$Revision: #12 $ =~ /\D(\d+)\s*$/ ;
8
+ $VERSION = ' 4.016 ' ;
9
9
10
10
use AutoLoader;
11
11
use base qw( Tk::Frame) ;
You can’t perform that action at this time.
0 commit comments