aboutsummaryrefslogtreecommitdiff
path: root/Perl/demos
diff options
context:
space:
mode:
Diffstat (limited to 'Perl/demos')
-rw-r--r--Perl/demos/Tk/demos/zinc_lib/curve_bezier.pl4
1 files changed, 3 insertions, 1 deletions
diff --git a/Perl/demos/Tk/demos/zinc_lib/curve_bezier.pl b/Perl/demos/Tk/demos/zinc_lib/curve_bezier.pl
index 9e2a980..bc59863 100644
--- a/Perl/demos/Tk/demos/zinc_lib/curve_bezier.pl
+++ b/Perl/demos/Tk/demos/zinc_lib/curve_bezier.pl
@@ -1,9 +1,11 @@
#!/usr/bin/perl -w
-# $Id: curve_bezier.pl,v 1.1 2002/12/20 12:28:38
+# $Id$
# This simple demo has been developped by C. Mertz <mertz@cena.fr>
####### This file has been initially inspired from svg examples
+package curveBezier;
+
use vars qw( $VERSION );
($VERSION) = sprintf("%d.%02d", q$Revision$ =~ /(\d+)\.(\d+)/);