diff --git a/C4/Members.pm b/C4/Members.pm
index 9d4bec10fe..c21f1411f4 100644
--- a/C4/Members.pm
+++ b/C4/Members.pm
@@ -28,7 +28,7 @@ use Digest::MD5 qw(md5_base64);
 
 use vars qw($VERSION @ISA @EXPORT @EXPORT_OK);
 
-$VERSION = 0.01;
+$VERSION = do { my @v = '$Revision$' =~ /\d+/g; shift(@v) . "." . join("_", map {sprintf "%03d", $_ } @v); };
 
 =head1 NAME