diff options
Diffstat (limited to 'Perl/demos/Tk/demos/zinc_pm/SimpleRadarControls.pm')
-rw-r--r-- | Perl/demos/Tk/demos/zinc_pm/SimpleRadarControls.pm | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/Perl/demos/Tk/demos/zinc_pm/SimpleRadarControls.pm b/Perl/demos/Tk/demos/zinc_pm/SimpleRadarControls.pm index 723f3ec..518a181 100644 --- a/Perl/demos/Tk/demos/zinc_pm/SimpleRadarControls.pm +++ b/Perl/demos/Tk/demos/zinc_pm/SimpleRadarControls.pm @@ -1,13 +1,13 @@ package SimpleRadarControls; -# $Id$ +# $Id: SimpleRadarControls.pm 1156 2003-09-15 12:25:06Z mertz $ # This simple radar has been initially developped by P. Lecoanet <lecoanet@cena.fr> # It has been adapted by C. Mertz <mertz@cena.fr> for demo purpose. # Thanks to Dunnigan,Jack [Edm]" <Jack.Dunnigan@EC.gc.ca> for a bug correction. use vars qw( $VERSION ); -($VERSION) = sprintf("%d.%02d", q$Revision$ =~ /(\d+)\.(\d+)/); +($VERSION) = sprintf("%d.%02d", q$Revision: 1156 $ =~ /(\d+)\.(\d+)/); $top = 1; |