version 1.78, 2005/04/07 06:56:26
|
version 1.83, 2005/05/29 01:46:16
|
Line 223 parent.lastknownpriv='/~$uname$thisdisfn
|
Line 223 parent.lastknownpriv='/~$uname$thisdisfn
|
|
|
function currdiract(theform) { |
function currdiract(theform) { |
if (theform.dirtask.options[theform.dirtask.selectedIndex].value == 'publish') { |
if (theform.dirtask.options[theform.dirtask.selectedIndex].value == 'publish') { |
document.publishdir.filename.value = theform.filename.value |
document.publishdir.filename.value = theform.filename.value; |
pubdir(document.publishdir) |
document.publishdir.submit(); |
} |
|
if (theform.dirtask.options[theform.dirtask.selectedIndex].value == 'publishsub') { |
|
document.publishdir.filename.value = theform.filename.value |
|
pubrecdir(document.publishdir) |
|
} |
} |
if (theform.dirtask.options[theform.dirtask.selectedIndex].value == 'editcat') { |
if (theform.dirtask.options[theform.dirtask.selectedIndex].value == 'editcat') { |
top.location=theform.filename.value+'default.meta' |
top.location=theform.filename.value+'default.meta' |
Line 239 parent.lastknownpriv='/~$uname$thisdisfn
|
Line 235 parent.lastknownpriv='/~$uname$thisdisfn
|
} |
} |
} |
} |
|
|
function pubdir(theform) { |
|
if (confirm('Publish complete directory?')) { |
|
forcepub(theform) |
|
theform.submit(); |
|
} |
|
} |
|
function pubrecdir(theform) { |
|
if (confirm('Publish directory and all subdirectories?')) { |
|
forcepub(theform); |
|
theform.pubrec.value='1'; |
|
theform.submit(); |
|
} |
|
} |
|
|
|
function forcepub(theform) { |
|
if (confirm('Force publication of unmodified files? - Cancel=No; OK=yes.')) { |
|
theform.forcerepub.value="ON"; |
|
} |
|
} |
|
|
|
function checkUpload(theform) { |
function checkUpload(theform) { |
if (theform.file == '') { |
if (theform.file == '') { |
alert("Please use 'Browse..' to choose a file first, before uploading") |
alert("Please use 'Browse..' to choose a file first, before uploading") |
Line 273 parent.lastknownpriv='/~$uname$thisdisfn
|
Line 249 parent.lastknownpriv='/~$uname$thisdisfn
|
return |
return |
} |
} |
if (theform.diraction.options[theform.diraction.selectedIndex].value == "publish") { |
if (theform.diraction.options[theform.diraction.selectedIndex].value == "publish") { |
pubdir(theform) |
theform.submit(); |
} |
|
if (theform.diraction.options[theform.diraction.selectedIndex].value == "publishsub") { |
|
pubrecdir(theform) |
|
} |
} |
if (theform.diraction.options[theform.diraction.selectedIndex].value == "editcat") { |
if (theform.diraction.options[theform.diraction.selectedIndex].value == "editcat") { |
top.location=theform.filename.value+'default.meta' |
top.location=theform.filename.value+'default.meta' |
Line 306 parent.lastknownpriv='/~$uname$thisdisfn
|
Line 279 parent.lastknownpriv='/~$uname$thisdisfn
|
if (activity == 'obsolete') { |
if (activity == 'obsolete') { |
var pubform = document.pubresource |
var pubform = document.pubresource |
pubform.filename.value = theform.filename.value |
pubform.filename.value = theform.filename.value |
alert("You will be taken to the publication page.\\nCheck the 'Obsolete' checkbox at the bottom of the page, and click 'Finalize Publication'.") |
pubform.makeobsolete.value=1; |
pubform.submit() |
pubform.submit() |
} |
} |
if (activity == 'print') { |
if (activity == 'print') { |
Line 317 parent.lastknownpriv='/~$uname$thisdisfn
|
Line 290 parent.lastknownpriv='/~$uname$thisdisfn
|
document.retrieveres.filename.value = theform.filename.value |
document.retrieveres.filename.value = theform.filename.value |
document.retrieveres.submit() |
document.retrieveres.submit() |
} |
} |
|
if (activity == 'cleanup') { |
|
document.cleanup.filename.value = theform.filename.value |
|
document.cleanup.submit() |
|
} |
return |
return |
} |
} |
function changename(theform,activity) { |
function changename(theform,activity) { |
Line 355 sub dircontrols {
|
Line 332 sub dircontrols {
|
<select name="dirtask" onChange="currdiract(this.form)"> |
<select name="dirtask" onChange="currdiract(this.form)"> |
<option>Select action</option> |
<option>Select action</option> |
<option value="publish">Publish directory</option> |
<option value="publish">Publish directory</option> |
<option value="publishsub">Publish with subdirectories</option> |
|
<option value="editcat">Edit catalog information</option> |
<option value="editcat">Edit catalog information</option> |
<option value="printdir">Print contents of directory</option> |
<option value="printdir">Print contents of directory</option> |
</select> |
</select> |
Line 364 sub dircontrols {
|
Line 340 sub dircontrols {
|
<form name="publishdir" method="post" action="/adm/publish" target="_parent"> |
<form name="publishdir" method="post" action="/adm/publish" target="_parent"> |
<input type="hidden" name="pubrec" value="" /> |
<input type="hidden" name="pubrec" value="" /> |
<input type="hidden" name="filename" value="" /> |
<input type="hidden" name="filename" value="" /> |
<input type="hidden" name="forcerepub" value="NO" /> |
|
</form> |
</form> |
<form name="printdir" method="post" action="/adm/printout" target="_parent"> |
<form name="printdir" method="post" action="/adm/printout" target="_parent"> |
<input type="hidden" name="postdata" value="" /> |
<input type="hidden" name="postdata" value="" /> |
Line 405 sub pubbuttons {
|
Line 380 sub pubbuttons {
|
$r->print('<form method="post" action="/adm/publish" target="_parent">'. |
$r->print('<form method="post" action="/adm/publish" target="_parent">'. |
'<table><tr><td><input type="hidden" name="filename" value="/~'. |
'<table><tr><td><input type="hidden" name="filename" value="/~'. |
$uname.$thisdisfn.'/" />'. |
$uname.$thisdisfn.'/" />'. |
'<input type="button" onClick="pubdir(this.form);" value="'. |
'<input type="submit" value="'.&mt('Publish Directory').'" /></td><td>'. |
&mt('Publish Directory').'" />'. |
|
'<input type="hidden" name="pubrec" value="" />'. |
|
'<input type="hidden" name="forcerepub" value="NO" />'. |
|
'<input type="button" onClick="pubrecdir(this.form);" value="'. |
|
&mt('Publish Directory and Sub Directories').'" /></td><td>'. |
|
'<input type="button" onClick="window.location='."'/~". |
'<input type="button" onClick="window.location='."'/~". |
$uname.$thisdisfn."/default.meta'".'" value="'. |
$uname.$thisdisfn."/default.meta'".'" value="'. |
&mt('Edit Directory Catalog Information').'" /></td></tr></table></form>'); |
&mt('Edit Directory Catalog Information').'" /></td></tr></table></form>'); |
Line 429 sub resourceactions {
|
Line 399 sub resourceactions {
|
<input type="hidden" name="action" value="delete" /> |
<input type="hidden" name="action" value="delete" /> |
</form> |
</form> |
<form name="pubresource" action="/adm/publish" target="_parent" method="post"> |
<form name="pubresource" action="/adm/publish" target="_parent" method="post"> |
<input type="hidden" name="pubrec" value="" /> |
|
<input type="hidden" name="filename" value="" /> |
<input type="hidden" name="filename" value="" /> |
<input type="hidden" name="forcerepub" value="NO" /> |
<input type="hidden" name="makeobsolete" value="0" /> |
</form> |
</form> |
<form name="printresource" action="/adm/printout" target="_parent" method="post"> |
<form name="printresource" action="/adm/printout" target="_parent" method="post"> |
<input type="hidden" name="postdata" value="" /> |
<input type="hidden" name="postdata" value="" /> |
Line 439 sub resourceactions {
|
Line 408 sub resourceactions {
|
<form name="retrieveres" action="/adm/retrieve" target="_parent" method="post"> |
<form name="retrieveres" action="/adm/retrieve" target="_parent" method="post"> |
<input type="hidden" name="filename" value="" /> |
<input type="hidden" name="filename" value="" /> |
</form> |
</form> |
|
<form name="cleanup" action="/adm/cleanup" target="_parent" method="post"> |
|
<input type="hidden" name="filename" value="" /> |
|
</form> |
END |
END |
} |
} |
|
|
Line 518 sub putdirectory {
|
Line 490 sub putdirectory {
|
'</select>'. |
'</select>'. |
'<input type="hidden" name="filename" value="'.$dirpath.'/'.$dirname.'/" />'. |
'<input type="hidden" name="filename" value="'.$dirpath.'/'.$dirname.'/" />'. |
'<input type="hidden" name="openname" value="'.$here.'/'.$dirname.'/" />'. |
'<input type="hidden" name="openname" value="'.$here.'/'.$dirname.'/" />'. |
'<input type="hidden" name="pubrec" value="" />'. |
|
'<input type="hidden" name="forcerepub" value="" />'. |
|
'<input type="hidden" name="postdata" value="" />'. |
'<input type="hidden" name="postdata" value="" />'. |
'</form>'; |
'</form>'; |
$$numdir ++; |
$$numdir ++; |
Line 545 sub putresource {
|
Line 515 sub putresource {
|
my ($r, $udom, $uname, $filename, $thisdisfn, |
my ($r, $udom, $uname, $filename, $thisdisfn, |
$resdir, $targetdir, $linkdir, |
$resdir, $targetdir, $linkdir, |
$cmtime,$bombs,$numres) = @_; |
$cmtime,$bombs,$numres) = @_; |
|
&Apache::lonnet::devalidate_cache_new('meta',$targetdir.'/'.$filename); |
my $pubstatus = 'unpublished'; |
my $pubstatus = 'unpublished'; |
my $status=&mt('Unpublished'); |
my $status=&mt('Unpublished'); |
my $bgcolor='#FFAA99'; |
my $bgcolor='#FFAA99'; |
Line 606 sub putresource {
|
Line 577 sub putresource {
|
$editlink=' (<a href="'.$linkdir.'/'.$filename.'?forceedit=1" target="_parent">'.&mt('EditXML').'</a>)'; |
$editlink=' (<a href="'.$linkdir.'/'.$filename.'?forceedit=1" target="_parent">'.&mt('EditXML').'</a>)'; |
$editlink2=' <br />(<a href="'.$linkdir.'/'.$filename.'?forceColoredit=1" target="_parent">'.&mt('Edit').'</a>)'; |
$editlink2=' <br />(<a href="'.$linkdir.'/'.$filename.'?forceColoredit=1" target="_parent">'.&mt('Edit').'</a>)'; |
} |
} |
|
if ($filename=~/\.(problem|exam|quiz|assess|survey|form|library|xml|html|htm|xhtml|xhtm|sty)$/) { |
|
$editlink.=' (<a href="/adm/cleanup?filename=/~'.$uname. |
|
$thisdisfn.'/'.$filename.'" target="_parent">'.&mt('Clean Up').')</a>'; |
|
} |
if ($filename=~/\.(zip|tar|bz2|gz|tar.gz|tar.bz2|tgz)$/) { |
if ($filename=~/\.(zip|tar|bz2|gz|tar.gz|tar.bz2|tgz)$/) { |
$editlink=' (<a target="_parent" href="/adm/cfile?decompress=/~'. |
$editlink=' (<a target="_parent" href="/adm/cfile?decompress=/~'. |
$uname.$thisdisfn.'/'.$filename.'">'.&mt('Decompress').'</a>)'; |
$uname.$thisdisfn.'/'.$filename.'">'.&mt('Decompress').'</a>)'; |
Line 651 sub create_pubselect {
|
Line 626 sub create_pubselect {
|
} |
} |
$$pub_select .= ' |
$$pub_select .= ' |
<option value="publish">'.$publish_button.'</option>'. |
<option value="publish">'.$publish_button.'</option>'. |
|
'<option value="cleanup">'.&mt('Clean up').'</option>'. |
'<option value="print">'.&mt('Print').'</option>'. |
'<option value="print">'.&mt('Print').'</option>'. |
'</select> |
'</select> |
<input type="hidden" name="filename" value="/~'. |
<input type="hidden" name="filename" value="/~'. |