Revision 08ca74a8
Von Moritz Bunkus vor mehr als 16 Jahren hinzugefügt
| SL/Form.pm | ||
|---|---|---|
| 639 | 639 |
$main::lxdebug->leave_sub(); |
| 640 | 640 |
} |
| 641 | 641 |
|
| 642 |
sub ajax_response_header {
|
|
| 643 |
$main::lxdebug->enter_sub(); |
|
| 644 |
|
|
| 645 |
my ($self) = @_; |
|
| 646 |
|
|
| 647 |
my $db_charset = $main::dbcharset ? $main::dbcharset : Common::DEFAULT_CHARSET; |
|
| 648 |
my $cgi = $main::cgi || CGI->new('');
|
|
| 649 |
my $output = $cgi->header('-charset' => $db_charset);
|
|
| 650 |
|
|
| 651 |
$main::lxdebug->leave_sub(); |
|
| 652 |
|
|
| 653 |
return $output; |
|
| 654 |
} |
|
| 655 |
|
|
| 642 | 656 |
sub _prepare_html_template {
|
| 643 | 657 |
$main::lxdebug->enter_sub(); |
| 644 | 658 |
|
Auch abrufbar als: Unified diff
AJAX-Antworten nicht direkt $cgi->header() ausgeben, sondern über eine Funktion, die auch das Charset ausgibt.