version 1.210, 2009/04/29 18:42:38
|
version 1.211, 2009/05/05 16:01:50
|
Line 76 Successful completion of an operation me
|
Line 76 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">'. |
return '<span class="LC_error">'."\n" |
$message. |
.'<img src="/adm/lonIcons/navmap.wrong.gif" /> '."\n" |
' <img src="/adm/lonIcons/navmap.wrong.gif" /></span>'; |
.$message."\n" |
|
.'</span>'."\n"; |
} else { |
} else { |
return '<span class="LC_success">'. |
return '<span class="LC_success">'."\n" |
$message. |
.'<img src="/adm/lonIcons/navmap.correct.gif" /> '."\n" |
' <img src="/adm/lonIcons/navmap.correct.gif" /></span>'; |
.$message."\n" |
|
.'</span>'."\n"; |
} |
} |
} |
} |
|
|