loncom/homework/structuretags.pm - diff

Return to structuretags.pm CVS log

Up to [LON-CAPA] / loncom / homework

version 1.441, 2009/03/27 01:07:10	version 1.442, 2009/04/06 13:29:02
Line 2034 sub start_simpleeditbutton {	Line 2034 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();
$result='<table width="100%" bgcolor="#FFFFAA" border="2"><tr><td>'.	# Warning make more sense and is more important on edit screen
'<a href="'.$url.'/smpedit?symb='.&escape($symb).'">'.&mt('Edit').'</a> - '.&mt('Note: it can take up to 10 minutes for changes to take effect for all users.').	# $result='<p class="LC_warning">'
&Apache::loncommon::help_open_topic('Caching').'</td></tr></table><br />';	# .&mt('Note: it can take up to 10 minutes for changes to take effect for all users.')
	# .&Apache::loncommon::help_open_topic('Caching')
	# .'</p>';
	$result.=&Apache::lontemplate::start_functionslist()
	.&Apache::lontemplate::item_functionslist(
	'<a href="'.$url.'/smpedit?symb='.&escape($symb).'">'.&mt('Edit').'</a>')
	.&Apache::lontemplate::end_functionslist();

}	}
return $result;	return $result;
}	}