summaryrefslogtreecommitdiff
path: root/FS
diff options
context:
space:
mode:
Diffstat (limited to 'FS')
-rw-r--r--FS/FS/ClientAPI/MyAccount.pm2
-rw-r--r--FS/FS/TicketSystem/RT_Internal.pm7
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 = (