Revision 4bd1e2f8
Von Sven Schöling vor etwa 10 Jahren hinzugefügt
| SL/USTVA.pm | ||
|---|---|---|
|
|
||
|
$form->error("Missing Parameter: @_") if !$userspath || !$filename;
|
||
|
|
||
|
$filename = "$form->{login}_$filename";
|
||
|
$filename = "$::myconfig{login}_$filename";
|
||
|
$filename =~ s|.*/||;
|
||
|
$filename = "$userspath/$filename";
|
||
|
open my $FACONF, "<", $filename or do {# Annon Sub
|
||
Auch abrufbar als: Unified diff
login nicht aus $::form nehmen. Teil 1