diff options
Diffstat (limited to 'Perl/demos/Tk/demos/zinc_lib/wheelOfFortune.pl')
-rw-r--r-- | Perl/demos/Tk/demos/zinc_lib/wheelOfFortune.pl | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/Perl/demos/Tk/demos/zinc_lib/wheelOfFortune.pl b/Perl/demos/Tk/demos/zinc_lib/wheelOfFortune.pl index cf117a5..c1b7acd 100644 --- a/Perl/demos/Tk/demos/zinc_lib/wheelOfFortune.pl +++ b/Perl/demos/Tk/demos/zinc_lib/wheelOfFortune.pl @@ -3,12 +3,12 @@ # This short script tries to demonstrate with a simple example what you can # do with Tk Zinc widget, in particular how to use group item, clipping, and # transformations. -# $Id$ +# $Id: wheelOfFortune.pl 1374 2004-03-05 12:36:08Z etienne $ # this demo has been developped by D. Etienne etienne@cena.fr # use vars qw( $VERSION ); -($VERSION) = sprintf("%d.%02d", q$Revision$ =~ /(\d+)\.(\d+)/); +($VERSION) = sprintf("%d.%02d", q$Revision: 1374 $ =~ /(\d+)\.(\d+)/); use Tk; # Zinc module is loaded... |