From 051f51309971e7afe561a9719830340826568cbd Mon Sep 17 00:00:00 2001 From: miker Date: Fri, 4 Aug 2006 04:36:38 +0000 Subject: [PATCH] fixing the fine generator git-svn-id: svn://svn.open-ils.org/ILS/trunk@5272 dcc99617-32d9-48b4-a31d-7c20da2025e4 --- .../perlmods/OpenILS/Application/Storage/Publisher/action.pm | 5 +++-- 1 file changed, 3 insertions(+), 2 deletions(-) diff --git a/Open-ILS/src/perlmods/OpenILS/Application/Storage/Publisher/action.pm b/Open-ILS/src/perlmods/OpenILS/Application/Storage/Publisher/action.pm index 1386f5d0d8..12692a78c4 100644 --- a/Open-ILS/src/perlmods/OpenILS/Application/Storage/Publisher/action.pm +++ b/Open-ILS/src/perlmods/OpenILS/Application/Storage/Publisher/action.pm @@ -518,8 +518,9 @@ sub generate_fines { my $dow_open = "dow_${dow}_open"; my $dow_close = "dow_${dow}_close"; - my $hoo = actor::org_unit::hours_of_operation->retrieve( $c->circ_lib ); - next if ( $hoo->$dow_open eq '00:00:00' and $hoo->$dow_close eq '00:00:00'); + if (my $hoo = actor::org_unit::hours_of_operation->retrieve( $c->circ_lib )) { + next if ( $hoo->$dow_open eq '00:00:00' and $hoo->$dow_close eq '00:00:00'); + } my $timestamptz = $billing_ts->strftime('%FT%T%z'); my @cl = actor::org_unit::closed_date->search_where( -- 2.43.2