From 5086962d68ab44a8650f60e9dc2e735137456abf Mon Sep 17 00:00:00 2001 From: miker Date: Fri, 22 Jul 2005 19:57:45 +0000 Subject: [PATCH] minor bug fixes git-svn-id: svn://svn.open-ils.org/ILS/trunk@1361 dcc99617-32d9-48b4-a31d-7c20da2025e4 --- .../src/perlmods/OpenILS/Application/Storage/Driver/Pg/dbi.pm | 4 ++-- .../perlmods/OpenILS/Application/Storage/Publisher/action.pm | 4 ++-- 2 files changed, 4 insertions(+), 4 deletions(-) diff --git a/Open-ILS/src/perlmods/OpenILS/Application/Storage/Driver/Pg/dbi.pm b/Open-ILS/src/perlmods/OpenILS/Application/Storage/Driver/Pg/dbi.pm index 4c1e768ead..bc14bc1a83 100644 --- a/Open-ILS/src/perlmods/OpenILS/Application/Storage/Driver/Pg/dbi.pm +++ b/Open-ILS/src/perlmods/OpenILS/Application/Storage/Driver/Pg/dbi.pm @@ -2,8 +2,8 @@ #--------------------------------------------------------------------- package money::billable_transaction; - money::billable_transaction->table( 'money.billable_transaction' ); - money::billable_transaction->sequence( 'money.billable_transaction_id_seq' ); + money::billable_transaction->table( 'money.billable_xact' ); + money::billable_transaction->sequence( 'money.billable_xact_id_seq' ); #--------------------------------------------------------------------- package money::billing; 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 2255b0d7b8..e53b918f71 100644 --- a/Open-ILS/src/perlmods/OpenILS/Application/Storage/Publisher/action.pm +++ b/Open-ILS/src/perlmods/OpenILS/Application/Storage/Publisher/action.pm @@ -392,11 +392,11 @@ sub hold_copy_targeter { $check_expire ||= '12h'; $check_expire = interval_to_seconds( $check_expire ); - my ($sec,$min,$hour,$mday,$mon,$year,$wday,$yday,$isdst) = gmtime(time - $check_expire); + my ($sec,$min,$hour,$mday,$mon,$year,$wday,$yday,$isdst) = gmtime(time() - $check_expire); $year += 1900; $mon += 1; my $expire_threshold = sprintf( - '%s-%0.2d-%0.2dT%s:%0.2d:%0.s2-00', + '%s-%0.2d-%0.2dT%0.2d:%0.2d:%0.2d-00', $year, $mon, $mday, $hour, $min, $sec ); -- 2.43.2