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.");
}
|