From: Tony Cook <tony@develop=help.com>
Date: Mon, 8 Aug 2005 04:18:45 +0000 (+0000)
Subject: - added VERSION numbers to most .pms
X-Git-Tag: Imager-0.48^2~118
X-Git-Url: http://git.imager.perl.org/imager.git/commitdiff_plain/f17b46d87ccbeb20c8f7d6e34790e516668ee4ee

- added VERSION numbers to most .pms
---

diff --git a/Changes b/Changes
index 6d6e14bf..46b6682d 100644
--- a/Changes
+++ b/Changes
@@ -1124,6 +1124,7 @@ Revision history for Perl extension Imager.
 - convert t/t15color.t to Test::More
 - prevent warnings when looking up a GIMP color with no palette
   parameter and $ENV{HOME} not set.
+- added VERSION numbers to most .pms
 
 =================================================================
 
diff --git a/lib/Imager/Color.pm b/lib/Imager/Color.pm
index 6fbfebf8..380a2a4f 100644
--- a/lib/Imager/Color.pm
+++ b/lib/Imager/Color.pm
@@ -2,7 +2,9 @@ package Imager::Color;
 
 use Imager;
 use strict;
-use vars qw();
+use vars qw($VERSION);
+
+$VERSION = sprintf "%d.%03d", q$Revision$=~/\d+/g;
 
 # It's just a front end to the XS creation functions.
 
diff --git a/lib/Imager/Color/Float.pm b/lib/Imager/Color/Float.pm
index a8c6d807..8994b010 100644
--- a/lib/Imager/Color/Float.pm
+++ b/lib/Imager/Color/Float.pm
@@ -2,7 +2,9 @@ package Imager::Color::Float;
 
 use Imager;
 use strict;
-use vars qw();
+use vars qw($VERSION);
+
+$VERSION = sprintf "%d.%03d", q$Revision$=~/\d+/g;
 
 # It's just a front end to the XS creation functions.
 
diff --git a/lib/Imager/Color/Table.pm b/lib/Imager/Color/Table.pm
index 2a265684..c1b8af5d 100644
--- a/lib/Imager/Color/Table.pm
+++ b/lib/Imager/Color/Table.pm
@@ -1,5 +1,8 @@
 package Imager::Color::Table;
 use strict;
+use vars qw($VERSION);
+
+$VERSION = sprintf "%d.%03d", q$Revision$=~/\d+/g;
 
     my %colors;
 
diff --git a/lib/Imager/Expr.pm b/lib/Imager/Expr.pm
index 8833dc9f..082f2de9 100644
--- a/lib/Imager/Expr.pm
+++ b/lib/Imager/Expr.pm
@@ -2,6 +2,9 @@ package Imager::Expr;
 
 use Imager::Regops;
 use strict;
+use vars qw($VERSION);
+
+$VERSION = sprintf "%d.%03d", q$Revision$=~/\d+/g;
 
 my %expr_types;
 
diff --git a/lib/Imager/Expr/Assem.pm b/lib/Imager/Expr/Assem.pm
index 04475614..a533bd46 100644
--- a/lib/Imager/Expr/Assem.pm
+++ b/lib/Imager/Expr/Assem.pm
@@ -2,6 +2,9 @@ package Imager::Expr::Assem;
 use strict;
 use Imager::Expr;
 use Imager::Regops;
+use vars qw($VERSION);
+
+$VERSION = sprintf "%d.%03d", q$Revision$=~/\d+/g;
 
 use vars qw(@ISA);
 @ISA = qw(Imager::Expr);
diff --git a/lib/Imager/Fill.pm b/lib/Imager/Fill.pm
index 7841a578..6111b290 100644
--- a/lib/Imager/Fill.pm
+++ b/lib/Imager/Fill.pm
@@ -1,5 +1,9 @@
 package Imager::Fill;
 use strict;
+use vars qw($VERSION);
+
+$VERSION = sprintf "%d.%03d", q$Revision$=~/\d+/g;
+
 # this needs to be kept in sync with the array of hatches in fills.c
 my @hatch_types =
   qw/check1x1 check2x2 check4x4 vline1 vline2 vline4
diff --git a/lib/Imager/Font.pm b/lib/Imager/Font.pm
index c806a25c..5d21a976 100644
--- a/lib/Imager/Font.pm
+++ b/lib/Imager/Font.pm
@@ -2,6 +2,9 @@ package Imager::Font;
 
 use Imager::Color;
 use strict;
+use vars qw($VERSION);
+
+$VERSION = sprintf "%d.%03d", q$Revision$=~/\d+/g;
 
 # the aim here is that we can:
 #  - add file based types in one place: here
diff --git a/lib/Imager/Font/BBox.pm b/lib/Imager/Font/BBox.pm
index dd58f7ab..775018cb 100644
--- a/lib/Imager/Font/BBox.pm
+++ b/lib/Imager/Font/BBox.pm
@@ -1,5 +1,8 @@
 package Imager::Font::BBox;
 use strict;
+use vars qw($VERSION);
+
+$VERSION = sprintf "%d.%03d", q$Revision$=~/\d+/g;
 
 =head1 NAME
 
diff --git a/lib/Imager/Font/FreeType2.pm b/lib/Imager/Font/FreeType2.pm
index d4802094..087a3f7b 100644
--- a/lib/Imager/Font/FreeType2.pm
+++ b/lib/Imager/Font/FreeType2.pm
@@ -1,9 +1,11 @@
 package Imager::Font::FreeType2;
 use strict;
 use Imager::Color;
-use vars qw(@ISA);
+use vars qw(@ISA $VERSION);
 @ISA = qw(Imager::Font);
 
+$VERSION = sprintf "%d.%03d", q$Revision$=~/\d+/g;
+
 *_first = \&Imager::Font::_first;
 
 sub new {
diff --git a/lib/Imager/Font/Truetype.pm b/lib/Imager/Font/Truetype.pm
index 283fa958..2321b0bf 100644
--- a/lib/Imager/Font/Truetype.pm
+++ b/lib/Imager/Font/Truetype.pm
@@ -1,8 +1,10 @@
 package Imager::Font::Truetype;
 use strict;
-use vars qw(@ISA);
+use vars qw(@ISA $VERSION);
 @ISA = qw(Imager::Font);
 
+$VERSION = sprintf "%d.%03d", q$Revision$=~/\d+/g;
+
 *_first = \&Imager::Font::_first;
 
 sub new {
diff --git a/lib/Imager/Font/Type1.pm b/lib/Imager/Font/Type1.pm
index 5c71e621..510d4dfe 100644
--- a/lib/Imager/Font/Type1.pm
+++ b/lib/Imager/Font/Type1.pm
@@ -1,9 +1,11 @@
 package Imager::Font::Type1;
 use strict;
 use Imager::Color;
-use vars qw(@ISA);
+use vars qw(@ISA $VERSION);
 @ISA = qw(Imager::Font);
 
+$VERSION = sprintf "%d.%03d", q$Revision$=~/\d+/g;
+
 *_first = \&Imager::Font::_first;
 
 my $t1aa;
diff --git a/lib/Imager/Font/Win32.pm b/lib/Imager/Font/Win32.pm
index ca1818f1..0e9a06e9 100644
--- a/lib/Imager/Font/Win32.pm
+++ b/lib/Imager/Font/Win32.pm
@@ -1,8 +1,10 @@
 package Imager::Font::Win32;
 use strict;
-use vars qw(@ISA);
+use vars qw(@ISA $VERSION);
 @ISA = qw(Imager::Font);
 
+$VERSION = sprintf "%d.%03d", q$Revision$=~/\d+/g;
+
 # called by Imager::Font::new()
 # since Win32's HFONTs include the size information this
 # is just a stub
diff --git a/lib/Imager/Font/Wrap.pm b/lib/Imager/Font/Wrap.pm
index b962a4cd..1f1ba325 100644
--- a/lib/Imager/Font/Wrap.pm
+++ b/lib/Imager/Font/Wrap.pm
@@ -3,6 +3,9 @@ package Imager::Font::Wrap;
 use strict;
 use Imager;
 use Imager::Font;
+use vars qw($VERSION);
+
+$VERSION = sprintf "%d.%03d", q$Revision$=~/\d+/g;
 
 *_first = \&Imager::Font::_first;
 
diff --git a/lib/Imager/Fountain.pm b/lib/Imager/Fountain.pm
index af7d2f68..65d5798f 100644
--- a/lib/Imager/Fountain.pm
+++ b/lib/Imager/Fountain.pm
@@ -1,6 +1,9 @@
 package Imager::Fountain;
 use strict;
 use Imager::Color::Float;
+use vars qw($VERSION);
+
+$VERSION = sprintf "%d.%03d", q$Revision$=~/\d+/g;
 
 =head1 NAME
 
diff --git a/lib/Imager/Matrix2d.pm b/lib/Imager/Matrix2d.pm
index 6aca2f9e..d5467b58 100644
--- a/lib/Imager/Matrix2d.pm
+++ b/lib/Imager/Matrix2d.pm
@@ -1,5 +1,8 @@
 package Imager::Matrix2d;
 use strict;
+use vars qw($VERSION);
+
+$VERSION = sprintf "%d.%03d", q$Revision$=~/\d+/g;
 
 =head1 NAME
 
diff --git a/lib/Imager/Transform.pm b/lib/Imager/Transform.pm
index 2d11034a..d44b2051 100644
--- a/lib/Imager/Transform.pm
+++ b/lib/Imager/Transform.pm
@@ -2,6 +2,9 @@ package Imager::Transform;
 use strict;
 use Imager;
 use Imager::Expr::Assem;
+use vars qw($VERSION);
+
+$VERSION = sprintf "%d.%03d", q$Revision$=~/\d+/g;
 
 my %funcs =
   (