blob: aa081a3804c34e49a2bbba0c7817b8fcfc21f9b0 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
|
<TEXTAREA COLS=<%$Width%> ROWS=15 WRAP=HARD NAME="<%$Name%>"><% $Default %><%$message%><%$signature%></TEXTAREA>
<%INIT>
my ($message);
if ($MessageURI) {
my $code;
($code, $Default)=RT::Link->GetContent($MessageURI);
}
if ($QuoteTransaction) {
my $transaction=RT::Transaction->new($session{'CurrentUser'});
$transaction->Load($QuoteTransaction);
$message=$transaction->Content(Quote => 1);
}
my $signature = '';
if ($session{'CurrentUser'}->UserObj->Signature) {
$signature = "-- \n".$session{'CurrentUser'}->UserObj->Signature;
}
</%INIT>
<%ARGS>
$QuoteTransaction => undef
$Name => 'Content'
$Default => ''
$DefaultURI => undef
$Width => 72
$MessageURI => undef
</%ARGS>
|