--- Core.pm.orig 2007-06-20 12:01:34.000000000 +0200 +++ Core.pm 2007-06-20 13:33:28.000000000 +0200 @@ -24,7 +24,7 @@ Jul => 6, Aug => 7, Sep => 8, Oct => 9, Nov => 10, Dec => 11 ); -$debug = 0; # toggle me +$debug = 1; # toggle me ############################################################################### # static @@ -42,11 +42,12 @@ # figure out where the sessions are $this->{sessionDir} = - $TWiki::cfg{Sessions}{Dir} || + $TWiki::cfg{TempfileDir} || &TWiki::Func::getDataDir() . "/.session"; if (! -e $this->{sessionDir}) { $this->{sessionDir} = '/tmp'; } + #writeDebug("sessionDir=$this->{sessionDir}"); # init properties $this->{isDakar} = (defined $TWiki::RELEASE)?1:0; @@ -310,6 +311,8 @@ if ($dump =~ /['"]?AUTHUSER['"]? => ["'](.*?)["']/) { $wikiName = $1; } + my $realwiki = TWiki::Func::userToWikiName($wikiName, 1); + $wikiName = $realwiki; #writeDebug("wikiName=$wikiName"); my $host;