From 9cd423cbb4ad6b9dd31fa31cd322479c7726d76d Mon Sep 17 00:00:00 2001
From: rangi <rangi>
Date: Wed, 15 Dec 2004 06:08:06 +0000
Subject: [PATCH] Making the version number reflect the cvs version, to allow
 for easier debugging. If we can ask people what version of a module they are
 running it makes error checking easier

---
 C4/Search.pm | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

diff --git a/C4/Search.pm b/C4/Search.pm
index e70218affb..8d305a8f6b 100755
--- a/C4/Search.pm
+++ b/C4/Search.pm
@@ -29,7 +29,8 @@ use C4::Date;
 use vars qw($VERSION @ISA @EXPORT @EXPORT_OK %EXPORT_TAGS);
 
 # set the version for version checking
-$VERSION = 0.02;
+$VERSION = do { my @v = '$Revision$' =~ /\d+/g;
+          shift(@v) . "." . join("_", map {sprintf "%03d", $_ } @v); };
 
 =head1 NAME
 
-- 
2.39.5