diff options
Diffstat (limited to 'Perl/demos/Tk/demos/zinc_lib/curve_bezier.pl')
-rw-r--r-- | Perl/demos/Tk/demos/zinc_lib/curve_bezier.pl | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/Perl/demos/Tk/demos/zinc_lib/curve_bezier.pl b/Perl/demos/Tk/demos/zinc_lib/curve_bezier.pl index bc59863..ffa6061 100644 --- a/Perl/demos/Tk/demos/zinc_lib/curve_bezier.pl +++ b/Perl/demos/Tk/demos/zinc_lib/curve_bezier.pl @@ -1,5 +1,5 @@ #!/usr/bin/perl -w -# $Id$ +# $Id: curve_bezier.pl 1550 2004-09-21 12:45:38Z mertz $ # This simple demo has been developped by C. Mertz <mertz@cena.fr> ####### This file has been initially inspired from svg examples @@ -7,7 +7,7 @@ package curveBezier; use vars qw( $VERSION ); -($VERSION) = sprintf("%d.%02d", q$Revision$ =~ /(\d+)\.(\d+)/); +($VERSION) = sprintf("%d.%02d", q$Revision: 1550 $ =~ /(\d+)\.(\d+)/); use Tk::Zinc; |