version 1.68, 2004/12/02 19:45:39
|
version 1.72, 2004/12/10 18:26:49
|
Line 94 sub handler {
|
Line 94 sub handler {
|
if ($ENV{'environment.remote'} eq 'off') { |
if ($ENV{'environment.remote'} eq 'off') { |
&dircontrols($r,$uname,$udom,$thisdisfn); # Put out actions for directory, |
&dircontrols($r,$uname,$udom,$thisdisfn); # Put out actions for directory, |
# browse/upload + new file page. |
# browse/upload + new file page. |
|
} else { |
|
&pubbuttons($r,$uname,$thisdisfn); |
} |
} |
&resourceactions($r,$uname,$udom,$thisdisfn); #Put out form used for printing/deletion etc. |
&resourceactions($r,$uname,$udom,$thisdisfn); #Put out form used for printing/deletion etc. |
|
|
Line 298 parent.lastknownpriv='/~$uname$thisdisfn
|
Line 300 parent.lastknownpriv='/~$uname$thisdisfn
|
if (activity == 'delete') { |
if (activity == 'delete') { |
var delform = document.delresource |
var delform = document.delresource |
delform.filename.value = theform.filename.value |
delform.filename.value = theform.filename.value |
if (confirm("Are you sure you want to delete "+theform.filename.value+"?")) { |
delform.submit() |
delform.submit() |
|
} |
|
} |
} |
if (activity == 'obsolete') { |
if (activity == 'obsolete') { |
var pubform = document.pubresource |
var pubform = document.pubresource |
Line 380 sub dircontrols {
|
Line 380 sub dircontrols {
|
<nobr> |
<nobr> |
<input type="hidden" name="filename" value="/~$uname$thisdisfn/" /> |
<input type="hidden" name="filename" value="/~$uname$thisdisfn/" /> |
<select name="action"> |
<select name="action"> |
<option>Select action</option> |
<option>Select Action</option> |
<option value="newfile">New file:</option> |
<option value="newfile">New file:</option> |
<option value="newhtmlfile">New HTML file:</option> |
<option value="newhtmlfile">New HTML file:</option> |
<option value="newproblemfile">New problem:</option> |
<option value="newproblemfile">New problem:</option> |
Line 398 sub dircontrols {
|
Line 398 sub dircontrols {
|
END |
END |
} |
} |
|
|
|
sub pubbuttons { |
|
my ($r,$uname,$thisdisfn) = @_; |
|
$r->print('<form method="post" action="/adm/publish" target="_parent">'. |
|
'<table><tr><td><input type="hidden" name="filename" value="/~'. |
|
$uname.$thisdisfn.'/" />'. |
|
'<input type="button" onClick="pubdir(this.form);" value="'. |
|
&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='."'/~". |
|
$uname.$thisdisfn."/default.meta'".'" value="'. |
|
&mt('Edit Directory Catalog Information').'" /></td></tr></table></form>'); |
|
} |
|
|
sub resourceactions { |
sub resourceactions { |
my ($r,$uname,$udom,$thisdisfn) = @_; |
my ($r,$uname,$udom,$thisdisfn) = @_; |
$r->print(<<END); |
$r->print(<<END); |