aboutsummaryrefslogtreecommitdiff
path: root/Perl
diff options
context:
space:
mode:
Diffstat (limited to 'Perl')
-rw-r--r--Perl/Zinc/Debug.pm3
-rw-r--r--Perl/Zinc/Trace.pm3
-rw-r--r--Perl/Zinc/TraceErrors.pm3
3 files changed, 9 insertions, 0 deletions
diff --git a/Perl/Zinc/Debug.pm b/Perl/Zinc/Debug.pm
index 7f9e739..b12333c 100644
--- a/Perl/Zinc/Debug.pm
+++ b/Perl/Zinc/Debug.pm
@@ -9,6 +9,9 @@
#---------------------------------------------------------------------------
package ZincDebug;
+use vars qw( $VERSION );
+($VERSION) = sprintf("%d.%02d", q$Revision$ =~ /(\d+)\.(\d+)/);
+
use strict 'vars';
use vars qw(@ISA @EXPORT @EXPORT_OK $WARNING $endoptions);
use Carp;
diff --git a/Perl/Zinc/Trace.pm b/Perl/Zinc/Trace.pm
index e9bb01c..ec284d8 100644
--- a/Perl/Zinc/Trace.pm
+++ b/Perl/Zinc/Trace.pm
@@ -24,6 +24,9 @@
package ZincTrace;
+use vars qw( $VERSION );
+($VERSION) = sprintf("%d.%02d", q$Revision$ =~ /(\d+)\.(\d+)/);
+
use Tk;
use strict;
use Tk::Zinc::TraceUtils;
diff --git a/Perl/Zinc/TraceErrors.pm b/Perl/Zinc/TraceErrors.pm
index 0d1e64f..95d9e08 100644
--- a/Perl/Zinc/TraceErrors.pm
+++ b/Perl/Zinc/TraceErrors.pm
@@ -27,6 +27,9 @@
package ZincTraceErrors;
+use vars qw( $VERSION );
+($VERSION) = sprintf("%d.%02d", q$Revision$ =~ /(\d+)\.(\d+)/);
+
use Tk;
use strict;
use Tk::Zinc::TraceUtils;