instrument adjust_ticket_priority to get information on #39536

[freeside.git] / FS / FS / ClientAPI / MyAccount.pm

diff --git a/FS/FS/ClientAPI/MyAccount.pm b/FS/FS/ClientAPI/MyAccount.pm
index 6b91101..62bd9e8 100644 (file)
--- a/FS/FS/ClientAPI/MyAccount.pm
+++ b/FS/FS/ClientAPI/MyAccount.pm
@@ -3606,6 +3606,11 @@ sub adjust_ticket_priority {
   my($context, $session, $custnum) = _custoragent_session_custnum($p);
   return { 'error' => $session } if $context eq 'error';
 
+  # temporary instrumentation for RT#39536
+    local $DEBUG = 1;
+    local $FS::TicketSystem::RT_Internal::DEBUG = 1;
+    warn "[adjust_ticket_priority]\n" . Dumper($p->{'values'}) . "\n\n";
+
 #  warn "$me adjust_ticket_priority: initializing ticket system\n" if $DEBUG;
 #  FS::TicketSystem->init;
   my $ss_priority = FS::TicketSystem->selfservice_priority;