--- docman.php	2000/09/06 10:49:15	1.13
+++ docman.php	2000/09/06 14:25:15	1.17
@@ -108,6 +108,7 @@
 			if ($user[0] == $GLOBALS["PHP_AUTH_USER"]) {
 				$gblUserName=$user[1];
 				$gblPw=$user[2];
+				$gblEmail=$user[3];
 				continue ;
 			}
 		}
@@ -120,8 +121,11 @@
 	$gblDateFmt="Y-m-d";
 	$gblTimeFmt="H:i:s";
 
-// Number of backup files to keep
-	$gblNumBackups=5;
+	// Number of backup files to keep
+	$gblNumBackups=3;
+
+	// show red star if newer than ... days
+	$gblModDays=1;
 
 	// choose GifIcon below unless you have the M$
 	// WingDings font installed on your system
@@ -295,7 +299,7 @@
 
 <?php
 	}
-	if ( !$file_lock && strstr(join(" ",$gblImages),$ext) ) {  
+	if ( !$file_lock && $ext!="" && strstr(join(' ',$gblImages),$ext) ) {  
 		$info  = getimagesize($fsPath) ;
 		$tstr = "<IMG SRC=\"".urlpath($relPath)."\" BORDER=0 " ;
 		$tstr .= $info[3] . " ALT=\"" . $fn . " - " ;
@@ -642,7 +646,7 @@
 
 function Navigate($fsRoot,$relDir) {
 
-	global $gblEditable, $gblIcon ;
+	global $gblEditable, $gblIcon, $gblModDays ;
 
 	$self     = $GLOBALS["PHP_SELF"] ;
 	if (isset($GLOBALS["HTTPS"]) && $GLOBALS["HTTPS"] == "on") {
@@ -757,9 +761,9 @@
 
 		$info_url=$self."?A=E&F=".urlencode($file)."&D=".urlencode($relDir);
 
-		if ( ($mod + 30*86400) > time() ) {
+		if ( ($mod + $gblModDays*86400) > time() ) {
 			$a  = "<SPAN CLASS=RED TITLE=\"Newer" ;
-			$a .= " than 30 days\"> * </SPAN>" ;
+			$a .= " than $gblModDays days\"> * </SPAN>" ;
 		}
 
 		$file_lock=CheckLock($path);
@@ -1100,6 +1104,24 @@
 
 //////////////////////////////////////////////////////////////////
 
+// recursivly delete directory
+
+function rrmdir($dir) {
+	$handle=opendir($dir);
+	while ($file = readdir($handle)) {
+		if ($file != "." && $file != "..") {
+			if (is_dir("$dir/$file"))
+				rrmdir("$dir/$file");
+			else
+				if (! @unlink("$dir/$file")) return(0);
+		}
+	}
+	closedir($handle);
+	return @rmdir($dir);
+}
+
+//////////////////////////////////////////////////////////////////
+
 // MAIN PROGRAM
 // ============
 // query parameters: capital letters
@@ -1196,7 +1218,7 @@
 		break ;
 
 	case "SAVE" :
-		$path = $gblFsRoot . escapeshellcmd($RELPATH) ;
+		$path = $gblFsRoot . $RELPATH ;
 		$writable = is_writeable($path) ;
 		$legaldir = is_writeable(dirname($path)) ;
 		$exists   = (file_exists($path)) ? 1 : 0 ; 
@@ -1270,7 +1292,7 @@
 			}
 		}
 		else {  // delete directory
-		  if ( ! @rmdir($fsDir) ) {
+		  if ( ! @rrmdir($fsDir) ) {
 		    Error("Rmdir failed", $tstr . $fsDir) ; 
 		  }
 		  else {