X-Git-Url: http://git.jankratochvil.net/?p=PerlMail.git;a=blobdiff_plain;f=PerlMail%2FContacts%2F9210.pm;fp=PerlMail%2FContacts%2F9210.pm;h=9be8d9db8cbeff1a94a8016f37d9da59fa2ea35e;hp=9d7a8800027eb2e61a0798364fec6d03c9635626;hb=4c605efe63f4a34215c4bf41b46a09f087f5ce96;hpb=0dd6e159920b9402e163cd35bdc8465dcfee65c9

diff --git a/PerlMail/Contacts/9210.pm b/PerlMail/Contacts/9210.pm
index 9d7a880..9be8d9d 100644
--- a/PerlMail/Contacts/9210.pm
+++ b/PerlMail/Contacts/9210.pm
@@ -1,6 +1,6 @@
 #! /usr/bin/perl
 # 
-#	$Id$
+#	$Id: 9210.pm,v 1.4 2004/12/19 11:47:47 short Exp $
 # Copyright (C) 2002-2004 Jan Kratochvil <project-PerlMail@jankratochvil.net>
 # 
 # This program is free software; you can redistribute it and/or modify
@@ -50,7 +50,7 @@ my($self)=@_;
 
 package PerlMail::Contacts::9210;
 use vars qw($VERSION);
-$VERSION=do { my @r=(q$Revision$=~/\d+/g); sprintf "%d.".("%03d"x$#r),@r; };
+$VERSION=do { my @r=(q$Revision: 1.4 $=~/\d+/g); sprintf "%d.".("%03d"x$#r),@r; };
 use strict;
 use warnings;
 use vars qw(@ISA);