Normalise version info from rcsid

diff --git a/scripts/accent.pl b/scripts/accent.pl
index 9ea65930c54fad970c7a612d6a1c9ba3a6dbf98d..3fe0ffa8719d0c3033fbf37592094ec5379dc6dd 100644 (file)
--- a/scripts/accent.pl
+++ b/scripts/accent.pl
@@ -28,7 +28,7 @@ use strict;
 use vars qw($VERSION %IRSSI);
 
 use Irssi;
-$VERSION = '$Id: accent.pl,v 1.34 2003/03/27 15:54:25 toma Exp $';
+($VERSION) = '$Id: accent.pl,v 1.34 2003/03/27 15:54:25 toma Exp $' =~ / (\d+\.\d+) /;
 %IRSSI = (
        authors     => 'Tamas SZERB',
        contact     => 'toma@rulez.org',

diff --git a/scripts/fortune.pl b/scripts/fortune.pl
index bd8b2e6cb99dd8e9fa4ba044568acc7fd11b5f37..be2e92e8d61bff3bdd74c40700d4bb7b12e755bd 100644 (file)
--- a/scripts/fortune.pl
+++ b/scripts/fortune.pl
@@ -32,7 +32,7 @@ use strict;
 use vars qw($VERSION %IRSSI);
 
 use Irssi;
-$VERSION = '$Id: fortune.pl,v 1.3 2004/12/17 19:39:19 eim Exp $';
+($VERSION) = '$Id: fortune.pl,v 1.3 2004/12/17 19:39:19 eim Exp $' =~ / (\d+\.\d+) /;
 %IRSSI = (
     authors     => 'Ivo Marino',
     contact     => 'eim@cpan.rg',