version 1.23, 2009/06/09 13:50:03
|
version 1.24, 2009/08/13 11:00:38
|
Line 135 sub delete_copy_file {
|
Line 135 sub delete_copy_file {
|
.&mt('Please use the code view in previous window to use shared code.') |
.&mt('Please use the code view in previous window to use shared code.') |
.'<br /><br />'); |
.'<br /><br />'); |
$r->print('<input type="button" value="Close Window" name="close"' |
$r->print('<input type="button" value="Close Window" name="close"' |
.' onClick="window.close()" />' |
.' onclick="window.close()" />' |
.'</p>'); |
.'</p>'); |
} else { |
} else { |
if(-e $path_to_new_file) { |
if(-e $path_to_new_file) { |
Line 182 sub copy_file {
|
Line 182 sub copy_file {
|
print $fs $file_output; |
print $fs $file_output; |
} |
} |
$r->print("<br /><br />"); |
$r->print("<br /><br />"); |
$r->print('<input type="button" value="Close Window" name="close" onClick="window.close()" />'); |
$r->print('<input type="button" value="Close Window" name="close" onclick="window.close()" />'); |
#Some 1.3'ish feature is to include the derivative feature, will go here..' |
#Some 1.3'ish feature is to include the derivative feature, will go here..' |
} |
} |
|
|
Line 258 sub handler {
|
Line 258 sub handler {
|
&delete_copy_file($r, $env{'form.author'}, $env{'form.newpath'}, $env{'form.filename'}, $env{'form.path'}, '0'); |
&delete_copy_file($r, $env{'form.author'}, $env{'form.newpath'}, $env{'form.filename'}, $env{'form.path'}, '0'); |
} else { |
} else { |
$r->print('<form name="copy" action="/adm/source" target="_parent" method="post"> |
$r->print('<form name="copy" action="/adm/source" target="_parent" method="post"> |
<input type="button" value="'.&mt('Close Window').'" name="close" onClick="window.close()" /> |
<input type="button" value="'.&mt('Close Window').'" name="close" onclick="window.close()" /> |
<input type="hidden" name="filename" value="'.$filename.'" /> |
<input type="hidden" name="filename" value="'.$filename.'" /> |
<input type="hidden" name="listname" value="'.$listname.'" /> |
<input type="hidden" name="listname" value="'.$listname.'" /> |
<input type="hidden" name="action" value="stage2" /> |
<input type="hidden" name="action" value="stage2" /> |