aboutsummaryrefslogtreecommitdiff
path: root/Perl/demos/Tk/demos/zinc_lib/tkZincLogo.pl
diff options
context:
space:
mode:
Diffstat (limited to 'Perl/demos/Tk/demos/zinc_lib/tkZincLogo.pl')
-rw-r--r--Perl/demos/Tk/demos/zinc_lib/tkZincLogo.pl4
1 files changed, 2 insertions, 2 deletions
diff --git a/Perl/demos/Tk/demos/zinc_lib/tkZincLogo.pl b/Perl/demos/Tk/demos/zinc_lib/tkZincLogo.pl
index 8e3ca9d..fef47b5 100644
--- a/Perl/demos/Tk/demos/zinc_lib/tkZincLogo.pl
+++ b/Perl/demos/Tk/demos/zinc_lib/tkZincLogo.pl
@@ -1,12 +1,12 @@
#!/usr/bin/perl
-# $Id$
+# $Id: tkZincLogo.pl 1420 2004-04-30 11:35:18Z lecoanet $
# this simple demo has been adapted by C. Mertz <mertz@cena.fr> from the original
# work of JL. Vinot <vinot@cena.fr>
package tkZincLogo; # for avoiding symbol collision between different demos
use vars qw( $VERSION );
-($VERSION) = sprintf("%d.%02d", q$Revision$ =~ /(\d+)\.(\d+)/);
+($VERSION) = sprintf("%d.%02d", q$Revision: 1420 $ =~ /(\d+)\.(\d+)/);
use Tk;
use Tk::Zinc;