version 1.254, 2010/09/27 20:59:41
|
version 1.255, 2010/10/12 16:07:43
|
Line 545 sub done_screen {
|
Line 545 sub done_screen {
|
my $title=&Apache::lonnet::gettitle($env{'request.uri'}); |
my $title=&Apache::lonnet::gettitle($env{'request.uri'}); |
my @files=split(',',$Apache::lonhomework::history{'resource.'.$version.'.0.bridgetask.portfiles'}); |
my @files=split(',',$Apache::lonhomework::history{'resource.'.$version.'.0.bridgetask.portfiles'}); |
my (undef,undef,$domain,$user)= &Apache::lonnet::whichuser(); |
my (undef,undef,$domain,$user)= &Apache::lonnet::whichuser(); |
my $files = '<ul>'; |
my ($msg,$files,$shown); |
my $msg; |
if (@files > 0) { |
foreach my $file (@files) { |
$files = '<ul>'; |
my $url="/uploaded/$domain/$user/portfolio$file"; |
foreach my $file (@files) { |
if (! &Apache::lonnet::stat_file($url)) { |
my $url="/uploaded/$domain/$user/portfolio$file"; |
$file = '<span class="LC_error">' |
if (! &Apache::lonnet::stat_file($url)) { |
.&mt('[_1]Nonexistent file:[_2]' |
$file = '<span class="LC_error">' |
,'<span class="LC_error"> ' |
.&mt('[_1]Nonexistent file:[_2]' |
,'</span> <span class="LC_filename">'.$file.'</span>'); |
,'<span class="LC_error"> ' |
$msg .= "<p>".&mt('Submitted non-existent file [_1]',$file)."</p>\n"; |
,'</span> <span class="LC_filename">'.$file.'</span>'); |
} else { |
$msg .= "<p>".&mt('Submitted non-existent file [_1]',$file)."</p>\n"; |
$file = '<span class="LC_filename">'.$file.'</span>'; |
} else { |
$msg .= "<p>".&mt('Submitted file [_1]',$file)."</p>\n"; |
$file = '<span class="LC_filename">'.$file.'</span>'; |
} |
$msg .= "<p>".&mt('Submitted file [_1]',$file)."</p>\n"; |
$files .= '<li>'.$file.'</li>'; |
} |
|
$files .= '<li>'.$file.'</li>'; |
|
} |
|
$files.='</ul>'; |
|
$shown = '<p>'.&mt('Files submitted: [_1]',$files).'</p>' |
|
.'<p>'.&mt('You are now done with this Bridge Task').'</p>' |
|
.'<hr />' |
|
.'<p><a href="/adm/logout">'.&mt('Logout').'</a></p>' |
|
.'<p><a href="/adm/roles">'.&mt('Change to a different course').'</a></p>'; |
|
} else { |
|
$msg = &mt("Submission status: no files currently submitted, when 'Done' was indicated."); |
|
$shown = '<p class="LC_error">'. |
|
&mt('You did not submit any files. Please try again.').'</span>'. |
|
'</p><p><a href="javascript:history.go(-1);">'.&mt('Back to Bridge Task').'</a></p><hr />'; |
} |
} |
$files.='</ul>'; |
|
my $subject = &mt('Submission message for [_1]',$title); |
my $subject = &mt('Submission message for [_1]',$title); |
my ($message_status,$comment_status); |
my ($message_status,$comment_status); |
my $setting = $env{'course.'.$env{'request.course.id'}.'.task_messages'}; |
my $setting = $env{'course.'.$env{'request.course.id'}.'.task_messages'}; |
Line 581 sub done_screen {
|
Line 593 sub done_screen {
|
$comment_status = '<p>'.&mt('Message sent to instructor: [_1]', |
$comment_status = '<p>'.&mt('Message sent to instructor: [_1]', |
$comment_status).' </p>'; |
$comment_status).' </p>'; |
} |
} |
|
|
return "<h2>$title</h2>" |
return "<h2>$title</h2>" |
.'<p>'.&mt('Files submitted: [_1]',$files).'</p>' |
.$shown |
.'<p>'.&mt('You are now done with this Bridge Task').'</p>' |
.$message_status |
.'<hr />' |
.$comment_status; |
.'<p><a href="/adm/logout">'.&mt('Logout').'</a></p>' |
|
.'<p><a href="/adm/roles">'.&mt('Change to a different course').'</a></p>' |
|
.$message_status |
|
.$comment_status; |
|
|
|
} |
} |
|
|
sub start_Task { |
sub start_Task { |