version 1.39, 2003/08/15 14:14:43
|
version 1.40, 2003/08/15 14:49:26
|
Line 189 sub handler {
|
Line 189 sub handler {
|
if (($ENV{'form.postdata'})&&($ENV{'request.course.fn'})) { |
if (($ENV{'form.postdata'})&&($ENV{'request.course.fn'})) { |
$ENV{'form.postdata'}=~/(\w+)\:(.*)/; |
$ENV{'form.postdata'}=~/(\w+)\:(.*)/; |
my $direction=$1; |
my $direction=$1; |
my $currenturl=&Apache::lonnet::unescape($2); |
my $currenturl=$2; |
if ($direction eq 'return') { |
if ($direction eq 'return') { |
# -------------------------------------------------------- Return to last known |
# -------------------------------------------------------- Return to last known |
my $last; |
my $last; |