version 1.54, 2002/09/05 15:51:07
|
version 1.55, 2002/09/05 19:35:00
|
Line 85 ENDMENUOUT2
|
Line 85 ENDMENUOUT2
|
} |
} |
if ($ENV{'request.role'}=~m/^cc\./ or $ENV{'request.role'}=~m/^in\./ or $ENV{'request.role'}=~m/^ta\./) { |
if ($ENV{'request.role'}=~m/^cc\./ or $ENV{'request.role'}=~m/^in\./ or $ENV{'request.role'}=~m/^ta\./) { |
$r->print(<<ENDMENUOUT6); |
$r->print(<<ENDMENUOUT6); |
<input type="radio" name="choice" value="All class print"> Print assignment (all problems from the primary sequence) for group of students<br /> |
<input type="radio" name="choice" value="All class print"> Print assignment (all problems from the primary sequence) for group of students<br /><br /> |
ENDMENUOUT6 |
ENDMENUOUT6 |
} |
} |
my $subdirtoprint = &Apache::lonnet::filelocation("",$ENV{'form.url'}); |
my $subdirtoprint = &Apache::lonnet::filelocation("",$ENV{'form.url'}); |