From: ivan Date: Thu, 9 Dec 2004 21:33:57 +0000 (+0000) Subject: set default requestor to email invoice addresses X-Git-Tag: BEFORE_FINAL_MASONIZE~803 X-Git-Url: http://git.freeside.biz/gitweb/?p=freeside.git;a=commitdiff_plain;h=57323a695e58b58cc8892784d356995f6e41bfcd set default requestor to email invoice addresses --- diff --git a/FS/FS/TicketSystem/RT_External.pm b/FS/FS/TicketSystem/RT_External.pm index c59fab48b..66f874702 100644 --- a/FS/FS/TicketSystem/RT_External.pm +++ b/FS/FS/TicketSystem/RT_External.pm @@ -3,6 +3,7 @@ package FS::TicketSystem::RT_External; use strict; use vars qw( $conf $default_queueid $priority_field $priority_field_queue $field ); +use URI::Escape; use FS::UID; install_callback FS::UID sub { @@ -122,6 +123,8 @@ sub _from_customer { sub href_customer_tickets { my( $self, $custnum, $priority ) = @_; + #i snarfed this from an RT bookmarked search, it could be unescaped in the + #source for readability and run through uri_escape my $href = 'Search/Results.html?Order=ASC&Query=%20MemberOf%20%3D%20%27freeside%3A%2F%2Ffreeside%2Fcust_main%2F'. $custnum. @@ -156,10 +159,12 @@ sub href_customer_tickets { sub href_new_ticket { - my( $self, $custnum ) = @_; + my( $self, $custnum, $requestors ) = @_; 'Ticket/Create.html?'. "Queue=$default_queueid". - "&new-MemberOf=freeside://freeside/cust_main/$custnum"; + "&new-MemberOf=freeside://freeside/cust_main/$custnum". + ( $requestors ? '&Requestors='. uri_escape($requestors) : '' ) + ; } sub href_ticket { diff --git a/httemplate/view/cust_main/tickets.html b/httemplate/view/cust_main/tickets.html index 61c94d61f..d6ddfa64c 100644 --- a/httemplate/view/cust_main/tickets.html +++ b/httemplate/view/cust_main/tickets.html @@ -30,7 +30,7 @@ Highest priority tickets (View all tickets for this customer) -(New ticket for this customer) +(New ticket for this customer) <%= table() %> #