Inhibit ZOOM/YAZ version mismatch warning if magic file exists

[ZOOM-Perl-moved-to-github.git] / lib / Net / Z3950 / ZOOM.pm

diff --git a/lib/Net/Z3950/ZOOM.pm b/lib/Net/Z3950/ZOOM.pm
index 39c3828..ea8cf10 100644 (file)
--- a/lib/Net/Z3950/ZOOM.pm
+++ b/lib/Net/Z3950/ZOOM.pm
@@ -1,4 +1,4 @@
-# $Id: ZOOM.pm,v 1.8 2006-01-20 12:33:30 mike Exp $
+# $Id: ZOOM.pm,v 1.9 2006-01-31 15:39:05 mike Exp $
 
 package Net::Z3950::ZOOM; 
 
@@ -13,7 +13,7 @@ XSLoader::load('Net::Z3950::ZOOM', $VERSION);
 
 my($vs, $ss) = ("", "");
 my $version = Net::Z3950::ZOOM::yaz_version($vs, $ss);
-if ($version < 0x02010B) {
+if ($version < 0x02010B && ! -f "/tmp/ignore-ZOOM-YAZ-version-mismatch") {
     warn <<__EOT__;
 *** WARNING!
 ZOOM-Perl requires at least version 2.0.11 of YAZ, but is currently