aboutsummaryrefslogtreecommitdiff
path: root/Perl/demos/Tk/demos/zinc_lib/triangles.pl
diff options
context:
space:
mode:
authorAchil2022-09-06 18:56:51 +0200
committerAchil2022-09-06 18:56:51 +0200
commit5bce61c04e589e368d534c4797711ac73c1e1f23 (patch)
tree299f2b64723a5c9697937f651cecf1416604baad /Perl/demos/Tk/demos/zinc_lib/triangles.pl
parentb60b3de318b4e621518681cc2824b4d9c605ae9e (diff)
downloadtkzinc-5bce61c04e589e368d534c4797711ac73c1e1f23.zip
tkzinc-5bce61c04e589e368d534c4797711ac73c1e1f23.tar.gz
tkzinc-5bce61c04e589e368d534c4797711ac73c1e1f23.tar.bz2
tkzinc-5bce61c04e589e368d534c4797711ac73c1e1f23.tar.xz
Daniel Etienne pre release for Bullseye
Diffstat (limited to 'Perl/demos/Tk/demos/zinc_lib/triangles.pl')
-rw-r--r--Perl/demos/Tk/demos/zinc_lib/triangles.pl4
1 files changed, 2 insertions, 2 deletions
diff --git a/Perl/demos/Tk/demos/zinc_lib/triangles.pl b/Perl/demos/Tk/demos/zinc_lib/triangles.pl
index 2dfba41..4bc24c6 100644
--- a/Perl/demos/Tk/demos/zinc_lib/triangles.pl
+++ b/Perl/demos/Tk/demos/zinc_lib/triangles.pl
@@ -1,9 +1,9 @@
#!/usr/bin/perl
-# $Id$
+# $Id: triangles.pl 1420 2004-04-30 11:35:18Z lecoanet $
# these simple samples have been developped by C. Mertz mertz@cena.fr and N. Banoun banoun@cena.fr
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;