X-Git-Url: http://git.freeside.biz/gitweb/?p=freeside.git;a=blobdiff_plain;f=FS%2FFS%2FClientAPI%2FMyAccount.pm;h=62bd9e84cf95f3972b170c72a23648c9c9209848;hp=6b91101d5ca36d2aec48c108fb066f12e2757aef;hb=9e0d1dacd8db275dff7f5827bc65b3f1531f8882;hpb=f421a622461d5259804f0da238f349f4a790d91f

diff --git a/FS/FS/ClientAPI/MyAccount.pm b/FS/FS/ClientAPI/MyAccount.pm
index 6b91101d5..62bd9e84c 100644
--- 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;