$userspath kommt aus dem globalen Namensraum. Ging mit dem letzten Commit kaputt...

diff --git a/SL/User.pm b/SL/User.pm
index 2b067c1..0fb72d9 100644 (file)
--- 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