version 1.27, 2011/03/07 02:13:02
|
version 1.28, 2011/08/26 15:57:56
|
Line 482 sub update_request_queue {
|
Line 482 sub update_request_queue {
|
mt => 'Your request for enrollment has been approved.', |
mt => 'Your request for enrollment has been approved.', |
}, |
}, |
{ |
{ |
mt => 'Visit [_1], to log-in and access the course', |
mt => 'Visit [_1] to log-in and access the course', |
args => [$firsturl], |
args => [$firsturl], |
}]; |
}]; |
$rejectedmsg = [{ |
$rejectedmsg = [{ |
Line 497 sub update_request_queue {
|
Line 497 sub update_request_queue {
|
$queue = 'pending'; |
$queue = 'pending'; |
} |
} |
%requesthash = &Apache::lonnet::dump_dom($namespace,$cdom,'_'.$queue); |
%requesthash = &Apache::lonnet::dump_dom($namespace,$cdom,'_'.$queue); |
$firsturl= &course_portal_url($cnum,$cdom); |
|
my %domconfig = &Apache::lonnet::get_dom('configuration',['requestcourses'],$cdom); |
my %domconfig = &Apache::lonnet::get_dom('configuration',['requestcourses'],$cdom); |
if (ref($domconfig{'requestcourses'}) eq 'HASH') { |
if (ref($domconfig{'requestcourses'}) eq 'HASH') { |
if (ref($domconfig{'requestcourses'}{'notify'}) eq 'HASH') { |
if (ref($domconfig{'requestcourses'}{'notify'}) eq 'HASH') { |
Line 509 sub update_request_queue {
|
Line 508 sub update_request_queue {
|
mt => 'Your course request has been approved.', |
mt => 'Your course request has been approved.', |
}, |
}, |
{ |
{ |
mt => 'Visit [_1], to log-in and access the course', |
mt => 'Visit [_1] to log-in and access the course', |
args => [$firsturl], |
args => [], |
}]; |
}]; |
$rejectionmsg{'course'} = |
$rejectionmsg{'course'} = |
[{ |
[{ |
Line 522 sub update_request_queue {
|
Line 521 sub update_request_queue {
|
mt => 'Your community request has been approved.', |
mt => 'Your community request has been approved.', |
}, |
}, |
{ |
{ |
mt => 'Visit [_1], to log-in and access the community', |
mt => 'Visit [_1] to log-in and access the community', |
args => [$firsturl], |
args => [], |
}]; |
}]; |
|
|
$rejectionmsg{'community'} = |
$rejectionmsg{'community'} = |
Line 645 sub update_request_queue {
|
Line 644 sub update_request_queue {
|
} else { |
} else { |
$approvedmsg = $approvalmsg{'course'}; |
$approvedmsg = $approvalmsg{'course'}; |
} |
} |
|
my $firsturl = &course_portal_url($cnum,$cdom); |
|
if (ref($approvedmsg) eq 'ARRAY') { |
|
if (ref($approvedmsg->[1]) eq 'HASH') { |
|
$approvedmsg->[1]->{'args'} = [$firsturl]; |
|
} |
|
} |
push(@completed,$cnum); |
push(@completed,$cnum); |
|
|
unless (&Apache::lonnet::del_dom($namespace,[$cnum.'_'.$queue],$cdom) eq 'ok') { |
unless (&Apache::lonnet::del_dom($namespace,[$cnum.'_'.$queue],$cdom) eq 'ok') { |
Line 1432 sub process_official_reqs {
|
Line 1437 sub process_official_reqs {
|
args => [$cdescr], |
args => [$cdescr], |
}, |
}, |
{ |
{ |
mt => 'Visit [_1], to log-in and access the course.', |
mt => 'Visit [_1] to log-in and access the course.', |
args => [$firsturl], |
args => [$firsturl], |
}, |
}, |
{ |
{ |