loncom/homework/structuretags.pm - diff

Return to structuretags.pm CVS log

Up to [LON-CAPA] / loncom / homework

version 1.450, 2009/06/09 16:33:55	version 1.451, 2009/06/11 16:48:28
Line 2051 sub start_simpleeditbutton {	Line 2051 sub start_simpleeditbutton {
my $url=$env{'request.noversionuri'};	my $url=$env{'request.noversionuri'};
$url=~s/\?.*$//;	$url=~s/\?.*$//;
my ($symb) = &Apache::lonnet::whichuser();	my ($symb) = &Apache::lonnet::whichuser();
# Warning make more sense and is more important on edit screen	# Warning makes more sense and is more important on edit screen
# $result='<p class="LC_warning">'	# $result='<p class="LC_warning">'
# .&mt('Note: it can take up to 10 minutes for changes to take effect for all users.')	# .&mt('Note: it can take up to 10 minutes for changes to take effect for all users.')
# .&Apache::loncommon::help_open_topic('Caching')	# .&Apache::loncommon::help_open_topic('Caching')
# .'</p>';	# .'</p>';
$result.=&Apache::lontemplate::start_functionslist()	$result.=&Apache::lonhtmlcommon::start_funclist()
.&Apache::lontemplate::item_functionslist(	.&Apache::lonhtmlcommon::add_item_funclist(
'<a href="'.$url.'/smpedit?symb='.&escape($symb).'">'.&mt('Edit').'</a>')	'<a href="'.$url.'/smpedit?symb='.&escape($symb).'">'
.&Apache::lontemplate::end_functionslist();	.&mt('Edit').'</a>')
	.&Apache::lonhtmlcommon::end_funclist();

}	}
return $result;	return $result;