From: Nick J. <nje...@us...> - 2002-02-28 07:46:23
|
Update of /cvsroot/sandweb/sandweb/lib/SandWeb In directory usw-pr-cvs1:/tmp/cvs-serv15271/lib/SandWeb Modified Files: Config.pm Log Message: * added delete_module method in SandWeb::Config * added module deletion support in sandweb.cgi * updated sandweb.html to pass repo_name when deleting a module. !!! - still need to delete the module from the filesystem, right now it just removes the data struct (NOTE: this actually makes no functional difference in the code, everything works and there should be no conflicts when checking out a module when the directory already exists (from a previous deletion)). Index: Config.pm =================================================================== RCS file: /cvsroot/sandweb/sandweb/lib/SandWeb/Config.pm,v retrieving revision 1.23 retrieving revision 1.24 diff -U2 -r1.23 -r1.24 --- Config.pm 28 Feb 2002 04:31:32 -0000 1.23 +++ Config.pm 28 Feb 2002 07:46:20 -0000 1.24 @@ -403,4 +403,14 @@ } +sub delete_module { + my $self = shift; + my %args = @_; + my $log = $self->{'log_obj'}; + my $repo = $args{'repo'} || ''; + my $module = $args{'module'} || ''; + + delete $self->{'repo'}->{$repo}->{'module'}->{$module}; +} + sub get_module_description { my $self = shift; |