dump debug not info if skipping to mfn

git-svn-id: svn+ssh://mjesec/home/dpavlin/svn/webpac2/trunk@513 07558da8-63fa-0310-ba24-9fe276d99e06

diff --git a/lib/WebPAC/Input.pm b/lib/WebPAC/Input.pm
index bc4350e..c2fa375 100644 (file)
--- a/lib/WebPAC/Input.pm
+++ b/lib/WebPAC/Input.pm
@@ -243,7 +243,7 @@ sub open {
        my $to_rec = $size;
 
        if (my $s = $self->{offset}) {
-               $log->info("skipping to MFN $s");
+               $log->debug("skipping to MFN $s");
                $from_rec = $s;
        } else {
                $self->{offset} = $from_rec;