version 1.12, 2000/11/14 19:14:03
|
version 1.13, 2000/11/16 11:58:30
|
Line 10
|
Line 10
|
# 08/30,08/31,09/06,09/14,09/15,09/16,09/19,09/20,09/21,09/23, |
# 08/30,08/31,09/06,09/14,09/15,09/16,09/19,09/20,09/21,09/23, |
# 10/02 Gerd Kortemeyer) |
# 10/02 Gerd Kortemeyer) |
# |
# |
# 10/03,10/05,10/06,10/07,10/09,10/10,10/11,10/16,10/17,11/14 Gerd Kortemeyer |
# 10/03,10/05,10/06,10/07,10/09,10/10,10/11,10/16,10/17, |
|
# 11/14,11/16 Gerd Kortemeyer |
|
|
package Apache::lonpageflip; |
package Apache::lonpageflip; |
|
|
Line 167 sub handler {
|
Line 168 sub handler {
|
$redirecturl=$hash{'src_'.$next}; |
$redirecturl=$hash{'src_'.$next}; |
$cachehash{&Apache::lonnet::declutter($redirecturl)} |
$cachehash{&Apache::lonnet::declutter($redirecturl)} |
=(split(/\./,$next))[1]; |
=(split(/\./,$next))[1]; |
if ($hash{'param_'.$next}) { |
|
my ($mapid,$resid)=split(/\./,$next); |
|
&Apache::lonnet::appendparms( |
|
&Apache::lonnet::declutter($hash{'map_id_'.$mapid}). |
|
'___'.$resid.'___'. |
|
&Apache::lonnet::declutter($redirecturl), |
|
$hash{'param_'.$next}); |
|
} |
|
} else { |
} else { |
# ------------------------ There are multiple possibilities for a next resource |
# ------------------------ There are multiple possibilities for a next resource |
$multichoice=1; |
$multichoice=1; |
Line 188 sub handler {
|
Line 181 sub handler {
|
{'src_'.$_} |
{'src_'.$_} |
)} |
)} |
=(split(/\./,$_))[1]; |
=(split(/\./,$_))[1]; |
if ($hash{'param_'.$_}) { |
|
my ($mapid,$resid)=split(/\./,$_); |
|
&Apache::lonnet::appendparms( |
|
&Apache::lonnet::declutter($hash{'map_id_'.$mapid}). |
|
'___'.$resid.'___'. |
|
&Apache::lonnet::declutter($hash{'src_'.$_}), |
|
$hash{'param_'.$_}); |
|
} |
|
} @possibilities; |
} @possibilities; |
} |
} |
} else { |
} else { |