From: mike Date: Mon, 26 Feb 2007 14:52:21 +0000 (+0000) Subject: Register log-level "zoom_check"; X-Git-Tag: cpan_1_22~66 X-Git-Url: http://lists.indexdata.dk/?a=commitdiff_plain;h=8e6b3ee459e693ca27710593d162919e63120b74;p=ZOOM-Perl-moved-to-github.git Register log-level "zoom_check"; --- diff --git a/lib/ZOOM.pm b/lib/ZOOM.pm index a571872..2b335b4 100644 --- a/lib/ZOOM.pm +++ b/lib/ZOOM.pm @@ -1,4 +1,4 @@ -# $Id: ZOOM.pm,v 1.46 2007-02-26 14:36:55 mike Exp $ +# $Id: ZOOM.pm,v 1.47 2007-02-26 14:52:21 mike Exp $ use strict; use warnings; @@ -1094,5 +1094,6 @@ sub log { Net::Z3950::ZOOM::yaz_log($level, join("", @message)); } +BEGIN { ZOOM::Log::mask_str("zoom_check"); } 1;