/[docman]/docman.php
This is repository of my old source code which isn't updated any more. Go to git.rot13.org for current projects!
ViewVC logotype

Diff of /docman.php

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 1.38 by dpavlin, Tue Mar 27 10:54:02 2001 UTC revision 1.40 by dpavlin, Fri Apr 6 08:46:42 2001 UTC
# Line 856  if (file_exists(".info.inc")) { Line 856  if (file_exists(".info.inc")) {
856   <NOBR>NAME <INPUT TYPE="TEXT" NAME="FN" SIZE=14>   <NOBR>NAME <INPUT TYPE="TEXT" NAME="FN" SIZE=14>
857   <INPUT TYPE="HIDDEN" NAME="POSTACTION" VALUE="CREATE">   <INPUT TYPE="HIDDEN" NAME="POSTACTION" VALUE="CREATE">
858   <INPUT TYPE="HIDDEN" NAME="DIR" VALUE="<?= $relDir ?>">   <INPUT TYPE="HIDDEN" NAME="DIR" VALUE="<?= $relDir ?>">
859   <INPUT TYPE="SUBMIT" VALUE="CREATE"></NOBR>   <INPUT TYPE="SUBMIT" VALUE="CREATE" NAME="CREATE">
860     </NOBR>
861   <NOBR>OR <A HREF="<?= $self ?>?A=U&D=<?= urlencode($relDir) ?>">UPLOAD</A> A FILE   <NOBR>OR <A HREF="<?= $self ?>?A=U&D=<?= urlencode($relDir) ?>">UPLOAD</A> A FILE
862   </NOBR>   </NOBR>
863  </TD></TR>  </TD></TR>
# Line 1059  function urlpath($url) { Line 1060  function urlpath($url) {
1060    
1061  function safe_rename($fromdir,$fromfile,$tofile) {  function safe_rename($fromdir,$fromfile,$tofile) {
1062          function try_rename($from,$to) {          function try_rename($from,$to) {
1063                  print "$from -> $to\n";  #               print "$from -> $to\n";
1064                  if (file_exists($from) && is_writeable(dirname($to))) {                  if (file_exists($from) && is_writeable(dirname($to))) {
1065                          rename($from,$to);                          rename($from,$to);
1066                  }                  }
# Line 1075  function safe_rename($fromdir,$fromfile, Line 1076  function safe_rename($fromdir,$fromfile,
1076          $todir=dirname($to);          $todir=dirname($to);
1077          $tofile=basename($to);          $tofile=basename($to);
1078    
1079          print "<pre>$fromdir / $fromfile -> $todir / $tofile\n\n";  #       print "<pre>$fromdir / $fromfile -> $todir / $tofile\n\n";
1080    
1081          try_rename("$fromdir/$fromfile","$todir/$tofile");          try_rename("$fromdir/$fromfile","$todir/$tofile");
1082          try_dir("$todir/.log");          try_dir("$todir/.log");
Legend:
Removed from v.1.38  
changed lines
  Added in v.1.40
  ViewVC Help
Powered by ViewVC 1.1.26