[Sandweb-commit] CVS: sandweb/bin sandweb.cgi,1.254,1.255

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

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

Modified Files:
	sandweb.cgi 
Log Message:
renaming "upload_file" to "upload"


Index: sandweb.cgi
===================================================================
RCS file: /cvsroot/sandweb/sandweb/bin/sandweb.cgi,v
retrieving revision 1.254
retrieving revision 1.255
diff -U2 -r1.254 -r1.255
--- sandweb.cgi	7 Mar 2002 08:19:28 -0000	1.254
+++ sandweb.cgi	7 Mar 2002 08:21:36 -0000	1.255
@@ -304,8 +304,8 @@
 				}
 			}
-			elsif ( $action eq 'upload_file' ) {
+			elsif ( $action eq 'upload' ) {
 				# called file uploader
 				if ($submit) {
-					upload_file_commit(
+					upload_commit(
 						ck_auth => $ck_auth,
 						filename => CGI::param('filename'),
@@ -315,5 +315,5 @@
 					)
 				} else {
-					upload_file_menu( 
+					upload_menu( 
 						ck_auth => $ck_auth,
 						module_name => $module_name,
@@ -1258,5 +1258,5 @@
 # 	users_dir	- location of user sandbox directories.
 ###############################################################################
-sub upload_file_menu {
+sub upload_menu {
 	my %args = @_;
 
@@ -1267,5 +1267,5 @@
 
 	my $content = $ui->get_menu( 
-		MENU => 'upload_file',
+		MENU => 'upload',
 		LOCATION => $location,
 		PROGNAME => $progname,
@@ -1604,5 +1604,5 @@
 
 ###############################################################################
-# upload_file_commit is called by upload_file_menu to save uploaded data
+# upload_commit is called by upload_menu to save uploaded data
 #
 # A File object is created and used.
@@ -1618,5 +1618,5 @@
 # 	users_dir	- location of user sandbox directories.
 ###############################################################################
-sub upload_file_commit {
+sub upload_commit {
 	my %args = @_;