version 1.51, 2003/09/03 18:09:50
|
version 1.52, 2003/09/09 18:46:28
|
Line 465 sub handler {
|
Line 465 sub handler {
|
my $entry=$ENV{'form.hide'}?$ENV{'form.hide'}:$ENV{'form.unhide'}; |
my $entry=$ENV{'form.hide'}?$ENV{'form.hide'}:$ENV{'form.unhide'}; |
|
|
my ($symb,$idx)=split(/\:\:\:/,$entry); |
my ($symb,$idx)=split(/\:\:\:/,$entry); |
my ($map,$ind,$url)=split(/\_\_\_/,$symb); |
my ($map,$ind,$url)=&Apache::lonnet::decode_symb($symb); |
|
|
my %contrib=&Apache::lonnet::restore($symb,$ENV{'request.course.id'}, |
my %contrib=&Apache::lonnet::restore($symb,$ENV{'request.course.id'}, |
$ENV{'course.'.$ENV{'request.course.id'}.'.domain'}, |
$ENV{'course.'.$ENV{'request.course.id'}.'.domain'}, |
Line 495 sub handler {
|
Line 495 sub handler {
|
my $entry=$ENV{'form.deldisc'}; |
my $entry=$ENV{'form.deldisc'}; |
|
|
my ($symb,$idx)=split(/\:\:\:/,$entry); |
my ($symb,$idx)=split(/\:\:\:/,$entry); |
my ($map,$ind,$url)=split(/\_\_\_/,$symb); |
my ($map,$ind,$url)=&Apache::lonnet::decode_symb($symb); |
|
|
my %contrib=&Apache::lonnet::restore($symb,$ENV{'request.course.id'}, |
my %contrib=&Apache::lonnet::restore($symb,$ENV{'request.course.id'}, |
$ENV{'course.'.$ENV{'request.course.id'}.'.domain'}, |
$ENV{'course.'.$ENV{'request.course.id'}.'.domain'}, |
Line 528 sub handler {
|
Line 528 sub handler {
|
unless ($symb) { |
unless ($symb) { |
$symb=$ENV{'form.symb'}; |
$symb=$ENV{'form.symb'}; |
if ($symb) { |
if ($symb) { |
my ($map,$id,$url)=split(/\_\_\_/,$symb); |
my ($map,$id,$url)=&Apache::lonnet::decode_symb($symb); |
$feedurl=&Apache::lonnet::clutter($url); |
$feedurl=&Apache::lonnet::clutter($url); |
} |
} |
} |
} |