From: Nick J. <nje...@us...> - 2002-02-18 12:30:03
|
Update of /cvsroot/sandweb/sandweb/lib/SandWeb In directory usw-pr-cvs1:/tmp/cvs-serv3612/lib/SandWeb Modified Files: Config.pm Log Message: * added description support Index: Config.pm =================================================================== RCS file: /cvsroot/sandweb/sandweb/lib/SandWeb/Config.pm,v retrieving revision 1.20 retrieving revision 1.21 diff -U2 -r1.20 -r1.21 --- Config.pm 18 Feb 2002 12:15:33 -0000 1.20 +++ Config.pm 18 Feb 2002 12:29:58 -0000 1.21 @@ -357,17 +357,18 @@ my $repo = $args{'repo'} || ''; my $module = $args{'module'} || ''; - my $module_desc = $args{'module_desc'} || ''; + my $module_description = $args{'module_description'} || ''; + $log->debug("module_description = '$module_description'\n"); if ($self->repository_exists(repo => $repo)) { - if (!$self->module_exists( - repo => $repo, - module => $module)) { - $self->{'repo'}->{$repo}->{'module'}->{$module}->{'desc'} = - $module_desc; + #if (!$self->module_exists( + # repo => $repo, + # module => $module)) { + $self->{'repo'}->{$repo}->{'module'}->{$module}->{'description'} = + $module_description; $self->{'repo'}->{$repo}->{'module'}->{$module}->{'name'} = - $module; - } else { - $log->debug("module '$module' already exists for repo '$repo'.\n"); - return 0; - } + $module; + #} else { + # $log->debug("module '$module' already exists for repo '$repo'.\n"); + # return 0; + #} } else { $log->debug("repo '$repo' does not exist.\n"); @@ -377,5 +378,5 @@ } -sub get_module_desc { +sub get_module_description { my $self = shift; my %args = @_; @@ -388,5 +389,5 @@ repo => $repo, module => $module )) { - return $self->{'repo'}->{$repo}->{'module'}->{$module}->{'module_desc'} || ''; + return $self->{'repo'}->{$repo}->{'module'}->{$module}->{'description'} || ''; } else { $log->debug("module '$module' does not exist for repo '$repo'.\n"); |