version 1.27, 2001/07/06 15:11:19
|
version 1.28, 2001/08/06 11:16:32
|
Line 9
|
Line 9
|
# 12/08,12/28, |
# 12/08,12/28, |
# 01/15/01 Gerd Kortemeyer |
# 01/15/01 Gerd Kortemeyer |
# 02/27/01 Scott Harrison |
# 02/27/01 Scott Harrison |
# 03/02,05/03,05/25,05/30,06/01,07/06 Gerd Kortemeyer |
# 03/02,05/03,05/25,05/30,06/01,07/06,08/06 Gerd Kortemeyer |
|
|
package Apache::lonroles; |
package Apache::lonroles; |
|
|
Line 285 ENDHEADER
|
Line 285 ENDHEADER
|
if ($tstatus eq 'is') { |
if ($tstatus eq 'is') { |
$r->print('<td><input type=submit value=Select name="'. |
$r->print('<td><input type=submit value=Select name="'. |
$trolecode.'"></td>'); |
$trolecode.'"></td>'); |
|
} elsif ($ENV{'user.adv'}) { |
|
$r->print( |
|
'<td><input type=submit value="Re-Initialize" name="'. |
|
$trolecode.'"></td>'); |
} else { |
} else { |
$r->print('<td> </td>'); |
$r->print('<td> </td>'); |
} |
} |