diff options
Diffstat (limited to 'Perl/demos/Tk/demos/zinc_lib/color-path-and-conic.pl')
-rw-r--r-- | Perl/demos/Tk/demos/zinc_lib/color-path-and-conic.pl | 3 |
1 files changed, 3 insertions, 0 deletions
diff --git a/Perl/demos/Tk/demos/zinc_lib/color-path-and-conic.pl b/Perl/demos/Tk/demos/zinc_lib/color-path-and-conic.pl index 2d21f93..18c5356 100644 --- a/Perl/demos/Tk/demos/zinc_lib/color-path-and-conic.pl +++ b/Perl/demos/Tk/demos/zinc_lib/color-path-and-conic.pl @@ -2,6 +2,9 @@ # $Id$ # these simple samples have been developped by C. Mertz mertz@cena.fr +use vars qw( $VERSION ); +($VERSION) = sprintf("%d.%02d", q$Revision$ =~ /(\d+)\.(\d+)/); + use Tk; use Tk::Zinc; use strict; |