version 1.193, 2003/07/07 07:32:16
|
version 1.194, 2003/07/10 06:17:41
|
Line 1090 sub start_simpleeditbutton {
|
Line 1090 sub start_simpleeditbutton {
|
(&Apache::lonnet::allowed('srm',$ENV{'request.course.id'}))) { |
(&Apache::lonnet::allowed('srm',$ENV{'request.course.id'}))) { |
my $url=$ENV{'REQUEST_URI'}; |
my $url=$ENV{'REQUEST_URI'}; |
$url=~s/\?.*$//; |
$url=~s/\?.*$//; |
$result='<a href="'.$url.'/smpedit">Edit</a><br />'; |
$result='<table width="100%" bgcolor="#FFFFAA" border="2"><tr><td>'. |
|
'<a href="'.$url.'/smpedit">Simple Problem Editor</a> - Note: it can take up to 10 minutes for changes to take effect for all users.</td></tr></table><br />'; |
} |
} |
return $result; |
return $result; |
} |
} |