Merge branch 'patch-9' of https://github.com/gjones2/Freeside (#13854 as this bug...
[freeside.git] / FS / FS / TicketSystem / RT_Internal.pm
index ffa8c7c..01e2e29 100644 (file)
@@ -50,7 +50,7 @@ sub access_right {
 sub session {
   my( $self, $session ) = @_;
 
-  if ( $session && $session->{'Current_User'} ) { # does this even work?
+  if ( $session && $session->{'CurrentUser'} ) { # does this even work?
     warn "$me session: using existing session and CurrentUser: \n".
          Dumper($session->{'CurrentUser'})
       if $DEBUG;
@@ -92,6 +92,7 @@ sub init {
   # this needs to be done on each fork
   warn "$me init: initializing RT\n" if $DEBUG;
   {
+    local $SIG{__WARN__};
     local $SIG{__DIE__};
     eval 'RT::Init("NoSignalHandlers"=>1);';
   }
@@ -151,7 +152,7 @@ sub _tickets_search {
 sub href_customer_tickets {
   my ($self, $custnum) = (shift, shift);
   if ($custnum =~ /^(\d+)$/) {
-    return $self->href_search_tickets("Customer.number = $custnum");
+    return $self->href_search_tickets("Customer.number = $custnum", @_);
   }
   warn "bad custnum $custnum"; '';
 }
@@ -159,7 +160,7 @@ sub href_customer_tickets {
 sub href_service_tickets {
   my ($self, $svcnum) = (shift, shift);
   if ($svcnum =~ /^(\d+)$/ ) {
-    return $self->href_search_tickets("Service.number = $svcnum");
+    return $self->href_search_tickets("Service.number = $svcnum", @_);
   }
   warn "bad svcnum $svcnum"; '';
 }