use method_lookup instead of direct call ($self is not what you think...)

git-svn-id: svn://svn.open-ils.org/ILS/trunk@12098 dcc99617-32d9-48b4-a31d-7c20da2025e4

diff --git a/Open-ILS/src/perlmods/OpenILS/Application/Storage/Driver/Pg/storage.pm b/Open-ILS/src/perlmods/OpenILS/Application/Storage/Driver/Pg/storage.pm
index 226e73a..d7623d0 100644 (file)
--- a/Open-ILS/src/perlmods/OpenILS/Application/Storage/Driver/Pg/storage.pm
+++ b/Open-ILS/src/perlmods/OpenILS/Application/Storage/Driver/Pg/storage.pm
@@ -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!",