version 1.207, 2009/04/07 15:40:38
|
version 1.209, 2009/04/25 20:22:07
|
Line 62 use Apache::lonlocal;
|
Line 62 use Apache::lonlocal;
|
use Apache::lonnet; |
use Apache::lonnet; |
use LONCAPA; |
use LONCAPA; |
|
|
|
############################################## |
|
############################################## |
|
|
|
=pod |
|
|
|
=item confirm_success |
|
|
|
Successful completion of an operation message |
|
|
|
=cut |
|
|
|
sub confirm_success { |
|
my ($message,$failure)=@_; |
|
if ($failure) { |
|
return '<span class="LC_error">'. |
|
$message. |
|
' <img src="/adm/lonIcons/navmap.wrong.gif" /></span>'; |
|
} else { |
|
return '<span class="LC_success">'. |
|
$message. |
|
' <img src="/adm/lonIcons/navmap.correct.gif" /></span>'; |
|
} |
|
} |
|
|
############################################## |
############################################## |
############################################## |
############################################## |