[open-ils-commits] r12098 - trunk/Open-ILS/src/perlmods/OpenILS/Application/Storage/Driver/Pg (miker)

[svn at svn.open-ils.org]

Author: miker
Date: 2009-02-06 12:58:04 -0500 (Fri, 06 Feb 2009)
New Revision: 12098

Modified:
   trunk/Open-ILS/src/perlmods/OpenILS/Application/Storage/Driver/Pg/storage.pm
Log:
use method_lookup instead of direct call ($self is not what you think...)

Modified: trunk/Open-ILS/src/perlmods/OpenILS/Application/Storage/Driver/Pg/storage.pm
===================================================================
--- trunk/Open-ILS/src/perlmods/OpenILS/Application/Storage/Driver/Pg/storage.pm	2009-02-06 17:52:57 UTC (rev 12097)
+++ trunk/Open-ILS/src/perlmods/OpenILS/Application/Storage/Driver/Pg/storage.pm	2009-02-06 17:58:04 UTC (rev 12098)
@@ -33,10 +33,10 @@
 		if (my $old_xact = $pg->current_xact_session) {
 			if ($pg->current_xact_is_auto) {
 				$log->debug("Commiting old autocommit transaction with Open-ILS XACT-ID [$old_xact]", INFO);
-				$self->pg_commit_xaction($client);
+				$self->method_lookup("open-ils.storage.transaction.commit")->run();
 			} else {
 				$log->debug("Rolling back old NON-autocommit transaction with Open-ILS XACT-ID [$old_xact]", INFO);
-				$self->pg_rollback_xaction($client);
+				$self->method_lookup("open-ils.storage.transaction.rollback")->run();
 				throw OpenSRF::DomainObject::oilsException->new(
 						statusCode => 500,
 						status => "Previous transaction rolled back!",