diff options
Diffstat (limited to 'FS')
-rw-r--r-- | FS/FS/ClientAPI/MyAccount.pm | 2 | ||||
-rw-r--r-- | FS/FS/TicketSystem/RT_Internal.pm | 7 |
2 files changed, 7 insertions, 2 deletions
diff --git a/FS/FS/ClientAPI/MyAccount.pm b/FS/FS/ClientAPI/MyAccount.pm index 7fc1b6055..927ebefb1 100644 --- a/FS/FS/ClientAPI/MyAccount.pm +++ b/FS/FS/ClientAPI/MyAccount.pm @@ -1668,7 +1668,7 @@ sub create_ticket { 'queue' => $queue, 'custnum' => $custnum, 'svcnum' => $session->{'svcnum'}, - map { $_ => $p->{$_} } qw( requestor cc subject message ) + map { $_ => $p->{$_} } qw( requestor cc subject message mime_type ) ); if ( ref($err_or_ticket) ) { diff --git a/FS/FS/TicketSystem/RT_Internal.pm b/FS/FS/TicketSystem/RT_Internal.pm index d6b9c5298..b1121efde 100644 --- a/FS/FS/TicketSystem/RT_Internal.pm +++ b/FS/FS/TicketSystem/RT_Internal.pm @@ -138,6 +138,11 @@ Cc: email address or arrayref of addresses Ticket message +=item mime_type + +MIME type to use for message. Defaults to text/plain. Specifying text/html +can be useful to use HTML markup in message. + =item custnum Customer number (see L<FS::cust_main>) to associate with ticket. @@ -169,7 +174,7 @@ sub create_ticket { my $mimeobj = MIME::Entity->build( 'Data' => $param{'message'}, - 'Type' => 'text/plain', + 'Type' => ( $param{'mime_type'} || 'text/plain' ), ); my %ticket = ( |