Update of /cvsroot/sandweb/sandweb/bin
In directory usw-pr-cvs1:/tmp/cvs-serv29127
Modified Files:
sandweb.cgi
Log Message:
* added repository directory creation when a repository is created (but
not updated).
Index: sandweb.cgi
===================================================================
RCS file: /cvsroot/sandweb/sandweb/bin/sandweb.cgi,v
retrieving revision 1.237
retrieving revision 1.238
diff -U2 -r1.237 -r1.238
--- sandweb.cgi 1 Mar 2002 04:34:00 -0000 1.237
+++ sandweb.cgi 1 Mar 2002 05:31:53 -0000 1.238
@@ -1984,6 +1984,18 @@
root => $repo_root,
);
+ # create repo directory
+ my $file = SandWeb::File->new(
+ 'log_obj' => $log,
+ 'filename' => $repo_name,
+ 'location' => $config->{'paths'}->{'users_dir'} . "/" . $auth->get_username(),
+ );
+ if (!$file->create_folder()) {
+ set_message("unable to create repository directory");
+ sandbox_menu( ck_auth => $ck_auth );
+ exit(0);
+ }
set_message("$repo_name created.");
}
+
} elsif ($submit eq 'Delete') {
# delete repository entry
|
