Revision 56a13992
Von Sven Schöling vor etwa 13 Jahren hinzugefügt
| SL/Form.pm | ||
|---|---|---|
| 1323 | 1323 |
if ($self->{OUT}) {
|
| 1324 | 1324 |
open(OUT, ">", $self->{OUT}) or $self->error("$self->{OUT} : $!");
|
| 1325 | 1325 |
} else {
|
| 1326 |
open(OUT, ">&", \*STDOUT) or $self->error("STDOUT : $!");
|
|
| 1326 |
*OUT = ($::dispatcher->get_standard_filehandles)[1];
|
|
| 1327 | 1327 |
$self->header; |
| 1328 | 1328 |
} |
| 1329 | 1329 |
|
| ... | ... | |
| 1332 | 1332 |
$self->error("$self->{IN} : " . $template->get_error());
|
| 1333 | 1333 |
} |
| 1334 | 1334 |
|
| 1335 |
close OUT; |
|
| 1335 |
close OUT if $self->{OUT};
|
|
| 1336 | 1336 |
|
| 1337 | 1337 |
if ($self->{media} eq 'file') {
|
| 1338 | 1338 |
copy(join('/', $self->{cwd}, $userspath, $self->{tmpfile}), $out =~ m|^/| ? $out : join('/', $self->{cwd}, $out)) if $template->uses_temp_file;
|
Auch abrufbar als: Unified diff
STDOUT nicht neu aufmachen