X-Git-Url: http://wagnertech.de/gitweb/gitweb.cgi/mfinanz.git/blobdiff_plain/98e5f0698f9419d600ee8652620217d17a3392f2..cef37ab039e348432a9d17ba81f2cd3f3d0009ed:/SL/User.pm diff --git a/SL/User.pm b/SL/User.pm index 2b067c1d6..0fb72d9fa 100644 --- a/SL/User.pm +++ b/SL/User.pm @@ -1030,6 +1030,8 @@ sub create_config { @config = config_vars(); + my $userspath = $main::userspath; + open(CONF, ">", "$userspath/$self->{login}.conf") || $self->error("$userspath/$self->{login}.conf : $!"); # create the config file