version 1.243, 2013/04/30 14:17:05
|
version 1.245, 2013/05/03 17:53:02
|
Line 2101 function confirmOverwrite() {
|
Line 2101 function confirmOverwrite() {
|
} |
} |
// ]]> |
// ]]> |
</script> |
</script> |
|
<p> |
$msg |
$msg |
<br /><div class="LC_warning"><form method="post" action="$url" name="existingfile" onsubmit="return confirmOverwrite();"> |
</p> |
<span class="LC_nobreak">$lt{'over'} |
<form method="post" action="$url" name="existingfile" onsubmit="return confirmOverwrite();"> |
|
<p class="LC_nobreak">$lt{'over'} |
<label><input type="radio" name="overwrite" value="1" /> |
<label><input type="radio" name="overwrite" value="1" /> |
$lt{'yes'}</label> |
$lt{'yes'}</label> |
<label><input type="radio" name="overwrite" value="0" checked="checked" />$lt{'no'}</label></span> |
<label><input type="radio" name="overwrite" value="0" checked="checked" />$lt{'no'}</label></p> |
|
<p> |
<input type="hidden" name="action" value="cancel_overwrite" /> |
<input type="hidden" name="action" value="cancel_overwrite" /> |
<input type="hidden" name="filename" value="$showfname" /> |
<input type="hidden" name="filename" value="$showfname" /> |
<input type="hidden" name="timestamp" value="$timestamp" /> |
<input type="hidden" name="timestamp" value="$timestamp" /> |
$hidden |
$hidden |
$parserflag |
$parserflag |
$group_elem |
$group_elem |
<br /><br /> |
|
<input type="submit" name="process" value="$lt{'cont'}" /> |
<input type="submit" name="process" value="$lt{'cont'}" /> |
</form></div> |
</p> |
|
</form> |
END |
END |
} else { |
} else { |
$r->print( |
$r->print( |
Line 2213 sub overwrite {
|
Line 2216 sub overwrite {
|
} |
} |
} |
} |
if ($fname eq '') { |
if ($fname eq '') { |
my $msg = &mt('Invalid filename: [_1]; the name of the uploaded file did not contain any letters, '. |
$r->print( |
|
&Apache::loncommon::confirmwrapper( |
|
&Apache::lonhtmlcommon::confirm_success( |
|
&mt('Invalid filename: [_1]; the name of the uploaded file did not contain any letters, '. |
'so after eliminating special characters there was nothing left.', |
'so after eliminating special characters there was nothing left.', |
'<span class="LC_filename">'.$env{'form.filename'}.'</span>'); |
'<span class="LC_filename">'.$env{'form.filename'}.'</span>'),1))); |
$r->print($msg.&done(undef,$url)); |
$r->print(&done(undef,$url)); |
return; |
return; |
} |
} |
$env{'form.'.$formname.'.filename'} = $fname; |
$env{'form.'.$formname.'.filename'} = $fname; |
Line 2227 sub overwrite {
|
Line 2233 sub overwrite {
|
\%allfiles,\%codebase,undef,undef,undef, |
\%allfiles,\%codebase,undef,undef,undef, |
undef,undef,undef,\$mimetype); |
undef,undef,undef,\$mimetype); |
if ($result !~ m|^/uploaded/|) { |
if ($result !~ m|^/uploaded/|) { |
$r->print('<p class="LC_error">'.&mt('An error occurred ([_1]) while trying to overwrite [_2].' |
$r->print( |
,$result,&display_file(undef,$fname)).'</p>'); |
&Apache::loncommon::confirmwrapper( |
$r->print(&after_overwrite(&mt('Back'),$url)); |
&Apache::lonhtmlcommon::confirm_success( |
|
&mt('An error occurred ([_1]) while trying to overwrite [_2].' |
|
,$result,&display_file(undef,$fname)),1))); |
} else { |
} else { |
if ($mode eq 'parse') { |
if ($mode eq 'parse') { |
if ($mimetype eq 'text/html') { |
if ($mimetype eq 'text/html') { |
Line 2237 sub overwrite {
|
Line 2245 sub overwrite {
|
&print_dependency_form($r,$url,\%allfiles,\%codebase,$result); |
&print_dependency_form($r,$url,\%allfiles,\%codebase,$result); |
return; |
return; |
} else { |
} else { |
$r->print('<p>'.&mt('Overwriting completed.').'<br />'. |
$r->print( |
&mt('No embedded items identified.').'</p>'); |
&Apache::loncommon::confirmwrapper( |
|
&Apache::lonhtmlcommon::confirm_success( |
|
&mt('Overwriting completed.')) |
|
.'<br />'.&mt('No embedded items identified.'))); |
} |
} |
} |
} |
|
} else { |
|
$r->print( |
|
&Apache::loncommon::confirmwrapper( |
|
&Apache::lonhtmlcommon::confirm_success( |
|
&mt('Overwriting completed.')))); |
} |
} |
$r->print(&after_overwrite(undef,$url)); |
|
} |
} |
return; |
|
} |
|
|
|
sub after_overwrite { |
|
my ($text,$url) = @_; |
|
my $group_elem; |
my $group_elem; |
if (defined($env{'form.group'})) { |
if (defined($env{'form.group'})) { |
$group_elem = '<input type="hidden" name="group" value="'.$env{'form.group'}.'" />'; |
$group_elem = '<input type="hidden" name="group" value="'.$env{'form.group'}.'" />'; |
Line 2256 sub after_overwrite {
|
Line 2267 sub after_overwrite {
|
$group_elem .= '<input type="hidden" name="ref" value="'.$env{'form.ref'}.'" />'."\n"; |
$group_elem .= '<input type="hidden" name="ref" value="'.$env{'form.ref'}.'" />'."\n"; |
} |
} |
} |
} |
if ($text eq '') { |
|
$text = &mt('Done'); |
|
} |
|
my $hidden = &hidden_elems(); |
my $hidden = &hidden_elems(); |
return <<END; |
$r->print( |
|
&Apache::lonhtmlcommon::actionbox( |
<h3><a href="javascript:document.overwritedone.submit();">$text</a></h3> |
['<a href="javascript:document.overwritedone.submit();">' |
<form name="overwritedone" method="post" action="$url" /> |
.&mt('Return to directory') |
$hidden |
.'</a>']) |
$group_elem |
.'<form name="overwritedone" method="post" action="'.$url.'">' |
</form> |
.$hidden |
END |
.$group_elem |
|
.'</form>' |
|
); |
|
return; |
} |
} |
|
|
sub lock_info { |
sub lock_info { |
Line 2708 sub handler {
|
Line 2719 sub handler {
|
$r->print( |
$r->print( |
'<p><span class="LC_warning">' |
'<p><span class="LC_warning">' |
.&mt('No file was selected to upload.') |
.&mt('No file was selected to upload.') |
.'</span><<br />' |
.'</span><br />' |
.&mt('To upload a file, click [_1]Browse...[_2] and select a file, then click [_1]Upload[_2].' |
.&mt('To upload a file, click [_1]Browse...[_2] and select a file, then click [_1]Upload[_2].' |
,'<strong>','</strong>') |
,'<strong>','</strong>') |
.'</p>' |
.'</p>' |