Return to lonsimplepage.pm CVS log | Up to [LON-CAPA] / loncom / interface |
version 1.11, 2003/07/10 10:53:18 | version 1.12, 2003/09/09 19:39:04 |
---|---|
Line 93 ENDDOCUMENT | Line 93 ENDDOCUMENT |
$r->print('</head>'.&Apache::loncommon::bodytag | $r->print('</head>'.&Apache::loncommon::bodytag |
("Course Page",$forcestudent,$addentries,'',$dom,$ENV{'form.register'})); | ("Course Page",$forcestudent,$addentries,'',$dom,$ENV{'form.register'})); |
my $allowed=&Apache::lonnet::allowed('srm',$ENV{'request.course.id'}); | my $allowed=&Apache::lonnet::allowed('mdc',$ENV{'request.course.id'}); |
if ($forcestudent) { $allowed=0; } | if ($forcestudent) { $allowed=0; } |