version 1.102, 2004/07/22 23:18:01
|
version 1.104, 2004/07/23 19:58:40
|
Line 829 END
|
Line 829 END
|
} else { |
} else { |
$oldmessage = $contrib{$idx.':message'}; |
$oldmessage = $contrib{$idx.':message'}; |
} |
} |
|
$oldmessage=&HTML::Entities::encode($oldmessage,'<>&"'); |
if ($contrib{$idx.':subject'} =~ /::::\d+::::(.+)$/si) { |
if ($contrib{$idx.':subject'} =~ /::::\d+::::(.+)$/si) { |
$subject = $1; |
$subject = $1; |
} else { |
} else { |
Line 958 Attachment (128 KB max size): <input typ
|
Line 959 Attachment (128 KB max size): <input typ
|
</p> |
</p> |
</form> |
</form> |
ENDDOCUMENT |
ENDDOCUMENT |
$r->print(&generate_preview_button(). |
$r->print(&generate_preview_button($onsubmit). |
&Apache::lonhtmlcommon::htmlareaselectactive('comment'). |
&Apache::lonhtmlcommon::htmlareaselectactive('comment'). |
'</body></html>'); |
'</body></html>'); |
} |
} |
Line 1757 sub show_preview {
|
Line 1758 sub show_preview {
|
} |
} |
|
|
sub generate_preview_button { |
sub generate_preview_button { |
|
my ($onsubmit)=@_; |
my $pre=&mt("Show Preview"); |
my $pre=&mt("Show Preview"); |
return(<<ENDPREVIEW); |
return(<<ENDPREVIEW); |
<form name="preview" action="/adm/feedback?preview=1" method="post" target="preview"> |
<form name="preview" action="/adm/feedback?preview=1" method="post" target="preview"> |
<input type="hidden" name="subject"> |
<input type="hidden" name="subject"> |
<input type="hidden" name="comment" /> |
<input type="hidden" name="comment" /> |
<input type="button" value="$pre" |
<input type="button" value="$pre" |
onClick="document.mailform.onsubmit();this.form.comment.value=document.mailform.comment.value;this.form.subject.value=document.mailform.subject.value;this.form.submit();" /> |
onClick="$onsubmit;this.form.comment.value=document.mailform.comment.value;this.form.subject.value=document.mailform.subject.value;this.form.submit();" /> |
</form> |
</form> |
ENDPREVIEW |
ENDPREVIEW |
} |
} |