From df0c7137ef880aedea912c8c735963f0261050d3 Mon Sep 17 00:00:00 2001
From: Ivan Kohler <ivan@freeside.biz>
Date: Tue, 5 Jun 2018 10:43:34 -0700
Subject: [PATCH] fix/finish having history records show correct users for
 UI-triggered queue jobs on v3, RT#14829

---
 FS/FS/Record.pm | 6 +++++-
 1 file changed, 5 insertions(+), 1 deletion(-)

diff --git a/FS/FS/Record.pm b/FS/FS/Record.pm
index 851285283..9f9b1e2fc 100644
--- a/FS/FS/Record.pm
+++ b/FS/FS/Record.pm
@@ -2210,7 +2210,11 @@ sub _h_statement {
   "INSERT INTO h_". $self->table. " ( ".
       join(', ', qw(history_date history_user history_action), @fields ).
     ") VALUES (".
-      join(', ', $time, dbh->quote(getotaker()), dbh->quote($action), @values).
+      join(', ', $time,
+                 dbh->quote($FS::CurrentUser::CurrentUser->username),
+                 dbh->quote($action),
+                 @values
+      ).
     ")"
   ;
 }
-- 
2.20.1