loncom/interface/lonhtmlcommon.pm - diff

Return to lonhtmlcommon.pm CVS log

Up to [LON-CAPA] / loncom / interface

version 1.264, 2010/01/26 05:22:03	version 1.265.2.1, 2010/02/17 18:42:38
Line 90 Successful completion of an operation me	Line 90 Successful completion of an operation me
sub confirm_success {	sub confirm_success {
my ($message,$failure)=@_;	my ($message,$failure)=@_;
if ($failure) {	if ($failure) {
return '<span class="LC_error">'."\n"	return '<span class="LC_error" style="font-size: inherit;">'."\n"
.'<img src="/adm/lonIcons/navmap.wrong.gif" alt="'.&mt('Error').'" /> '."\n"	.'<img src="/adm/lonIcons/navmap.wrong.gif" alt="'.&mt('Error').'" /> '."\n"
.$message."\n"	.$message."\n"
.'</span>'."\n";	.'</span>'."\n";
Line 1258 sub disablelink {	Line 1258 sub disablelink {
if (defined($#fields)) {	if (defined($#fields)) {
unless ($#fields>=0) { return ''; }	unless ($#fields>=0) { return ''; }
}	}
return '<a href="'.&HTML::Entities::encode('/adm/preferences?action=set_wysiwyg&wysiwyg=off&returnurl=','<>&"').&escape($ENV{'REQUEST_URI'}).'">'.&mt('Disable WYSIWYG Editor').'</a>';	return ''; #'<a href="'.&HTML::Entities::encode('/adm/preferences?action=set_wysiwyg&wysiwyg=off&returnurl=','<>&"').&escape($ENV{'REQUEST_URI'}).'">'.&mt('Disable WYSIWYG Editor').'</a>';
}	}

sub enablelink {	sub enablelink {