From: miker Date: Wed, 13 Jul 2005 20:07:04 +0000 (+0000) Subject: ooops... segfault X-Git-Url: https://old-git.evergreen-ils.org/?a=commitdiff_plain;h=2853a8dbf610ad23f780be7c67f7987551bf9424;p=Evergreen.git ooops... segfault git-svn-id: svn://svn.open-ils.org/ILS/trunk@1172 dcc99617-32d9-48b4-a31d-7c20da2025e4 --- diff --git a/Open-ILS/src/perlmods/OpenILS/Application/Storage/Publisher.pm b/Open-ILS/src/perlmods/OpenILS/Application/Storage/Publisher.pm index c58868281e..c88351eefb 100644 --- a/Open-ILS/src/perlmods/OpenILS/Application/Storage/Publisher.pm +++ b/Open-ILS/src/perlmods/OpenILS/Application/Storage/Publisher.pm @@ -4,8 +4,8 @@ our $VERSION = 1; use Digest::MD5 qw/md5_hex/; use OpenSRF::EX qw/:try/;; -use OpenSRF::Utils::Logger qw/:level/; use OpenSRF::Utils; +use OpenSRF::Utils::Logger qw/:level/; use OpenILS::Utils::Fieldmapper; my $log = 'OpenSRF::Utils::Logger'; @@ -97,7 +97,7 @@ sub cachable_wrapper { OpenSRF::Utils::Cache->new->put_cache( $cache_key => [@res[int($cache_page * $cache_args{cache_page_size}) .. int(($cache_page + 1) * $cache_args{cache_page_size}) ]] => - OpenSRF::Utils->interval_to_seconds( $cache_args{timeout} ); + OpenSRF::Utils->interval_to_seconds( $cache_args{timeout} ) ); } catch Error with { my $e = shift;