[Sandweb-commit] CVS: sandweb/bin sandweb.cgi,1.239,1.240

[Nick J. <nje...@us...>]

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

Modified Files:
	sandweb.cgi 
Log Message:
* made directory creation happen before entry into the data structure,
  so that you don't get invalid entries.


Index: sandweb.cgi
===================================================================
RCS file: /cvsroot/sandweb/sandweb/bin/sandweb.cgi,v
retrieving revision 1.239
retrieving revision 1.240
diff -U2 -r1.239 -r1.240
--- sandweb.cgi	1 Mar 2002 05:33:12 -0000	1.239
+++ sandweb.cgi	1 Mar 2002 05:56:52 -0000	1.240
@@ -1976,12 +1976,4 @@
 			set_message("$repo_name updated.");
 		} else {	
-			$user->create_repo(
-				name => $repo_name, 
-				server => $repo_server,
-				username => $repo_username,
-				connection => $repo_connection,
-				type => $repo_type,
-				root => $repo_root,
-			);
 			# create repo directory
 			my $file = SandWeb::File->new(
@@ -1995,4 +1987,13 @@
 				exit(0);
 			}
+			# directory created, not create repository data struct
+			$user->create_repo(
+				name => $repo_name, 
+				server => $repo_server,
+				username => $repo_username,
+				connection => $repo_connection,
+				type => $repo_type,
+				root => $repo_root,
+			);
 			set_message("$repo_name created.");
 		}