[Sandweb-commit] CVS: sandweb/bin sandweb.cgi,1.251,1.252

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

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

Modified Files:
	sandweb.cgi 
Log Message:
ok, rename_file is now rename.
funny, i didn't notice, but I did name the method "rename" not
"rename_file" in the File class, but called it "rename_file" every
where else .. odd :)


Index: sandweb.cgi
===================================================================
RCS file: /cvsroot/sandweb/sandweb/bin/sandweb.cgi,v
retrieving revision 1.251
retrieving revision 1.252
diff -U2 -r1.251 -r1.252
--- sandweb.cgi	7 Mar 2002 05:06:03 -0000	1.251
+++ sandweb.cgi	7 Mar 2002 08:07:39 -0000	1.252
@@ -245,8 +245,8 @@
 				);
 			}
-			elsif ( $action eq 'rename_file' ) {
+			elsif ( $action eq 'rename' ) {
 				# called file renamer
 				if ($submit) {
-					rename_file_commit( 
+					rename_commit( 
 						ck_auth => $ck_auth,
 						filename => CGI::param('filename'),
@@ -257,5 +257,5 @@
 					);
 				} else {
-					rename_file_menu(
+					rename_menu(
 						ck_auth => $ck_auth,
 						filename => CGI::param('filename'),
@@ -1115,5 +1115,5 @@
 # 	users_dir	- location of user sandbox directories.
 ###############################################################################
-sub rename_file_menu {
+sub rename_menu {
 	my %args = @_;
 
@@ -1143,5 +1143,5 @@
 
 	my $content = $ui->get_menu( 
-		MENU => 'rename_file',
+		MENU => 'rename',
 		PROGNAME => $progname,
 		MODULE_NAME => $module_name,
@@ -1470,5 +1470,5 @@
 
 ###############################################################################
-# rename_file_commit is called by rename_file_menu to rename a file
+# rename_commit is called by rename_menu to rename a file
 #
 # A File object is created and used.
@@ -1485,5 +1485,5 @@
 # 	users_dir	- location of user sandbox directories.
 ###############################################################################
-sub rename_file_commit {
+sub rename_commit {
 	my %args = @_;