Index: lib/TWiki/Plugins/RedDotPlugin.pm =================================================================== --- lib/TWiki/Plugins/RedDotPlugin.pm (revision 11595) +++ lib/TWiki/Plugins/RedDotPlugin.pm (working copy) @@ -109,21 +109,20 @@ # execute redirect if ($theAction =~ /^(view|save)/) { - my $theRedirect; + my $theRedirect = $query->param('redirect'); if ($theAction =~ /^view/) { writeDebug("found view"); $theRedirect = &TWiki::Func::getSessionValue($sessionKey); TWiki::Func::clearSessionValue($sessionKey); } else { writeDebug("found save"); - $theRedirect = $query->param('redirect'); } if ($theRedirect) { writeDebug("found theRedirect=$theRedirect"); my $toWeb = $web; my $toTopic = $theRedirect; my $toAnchor = ''; - if ($theRedirect =~ /(.*)\.(.*)/) { + if ($theRedirect =~ /^(.*)\.(.*?)$/) { $toWeb = $1; $toTopic = $2; }