From 9539d3f490cba4738a40025fcd241d1cb2372ad9 Mon Sep 17 00:00:00 2001 From: Ivan Kohler Date: Tue, 7 Jun 2016 01:14:49 -0700 Subject: [PATCH 1/1] log with a separate db connection --- FS/FS/access_user_log.pm | 6 ++++++ 1 file changed, 6 insertions(+) diff --git a/FS/FS/access_user_log.pm b/FS/FS/access_user_log.pm index 15437b772..563f3cef0 100644 --- a/FS/FS/access_user_log.pm +++ b/FS/FS/access_user_log.pm @@ -2,6 +2,7 @@ package FS::access_user_log; use base qw( FS::Record ); use strict; +use FS::UID qw( dbh ); #use FS::Record qw( qsearch qsearchs ); use FS::CurrentUser; @@ -85,6 +86,11 @@ sub insert_new_path { 'render_seconds' => $render_seconds, } ); + #so we can still log pages after a transaction-aborting SQL error (and then + # show the # error page) + local($FS::UID::dbh) = dbh->clone; + #if current transaction is aborted (if we had a way to check for it) + my $error = $self->insert; die $error if $error; -- 2.11.0