[Sandweb-commit] CVS: sandweb/bin sandweb.cgi,1.105,1.106

[Rob H. <for...@us...>]

Update of /cvsroot/sandweb/sandweb/bin
In directory usw-pr-cvs1:/tmp/cvs-serv4678/bin

Modified Files:
	sandweb.cgi 
Log Message:
removed "Commands" column, you can get to edit by clicking on a file
( which brings up the View screen ) and pressing the edit button.
saving the file brings you back to the View screen.


Index: sandweb.cgi
===================================================================
RCS file: /cvsroot/sandweb/sandweb/bin/sandweb.cgi,v
retrieving revision 1.105
retrieving revision 1.106
diff -U2 -r1.105 -r1.106
--- sandweb.cgi	2001/12/21 02:40:16	1.105
+++ sandweb.cgi	2001/12/21 08:12:20	1.106
@@ -464,17 +464,18 @@
 		$log->debug("viewing file : $filename");
 
-		my $content = $file->file_read();
+		my $data = $file->file_read();
 
 		if ( $file->get_file_type() ne "Text" ) {
 			$log->debug("User wants to view non-text file : $filename");
 			set_error("This does not appear to be a text file.");
-			$content = "";
+			$data = "";
 		}
 
 		my $content = $ui->get_menu( 
 			MENU => 'view_file',
-			PROGNAME => $progname,
+			PROGNAME => "$progname",
 			FILENAME => "$filename",
-			CONTENT => "$content",
+			LOCATION => "$location",
+			DATA => "$data",
 		);
 
@@ -532,6 +533,4 @@
 			PROGNAME => $progname,
 			CONTENT => "$content",
-			FILENAME => $filename,
-			LOCATION => $location,
 			FULLPATH => "$users_dir/$username/$location",
 		);
@@ -542,4 +541,6 @@
 			MENU_TITLE => 'SandWeb',
 			SUBMENU_TITLE => 'edit file',
+			FILENAME => $filename,
+			LOCATION => $location,
 			FOOTER => '',
 			CONTENT => $content,