/[cvs]/nfo/perl/libs/Data/Rap.pm
ViewVC logotype

Diff of /nfo/perl/libs/Data/Rap.pm

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 1.7 by joko, Tue May 13 05:52:58 2003 UTC revision 1.9 by joko, Sun Jun 20 16:06:57 2004 UTC
# Line 2  Line 2 
2  ##  $Id$  ##  $Id$
3  ## -------------------------------------------------------------------------  ## -------------------------------------------------------------------------
4  ##  $Log$  ##  $Log$
5    ##  Revision 1.9  2004/06/20 16:06:57  joko
6    ##  sub start: little modification, now using targets-cache if available
7    ##
8    ##  Revision 1.8  2003/12/05 04:59:33  joko
9    ##  + minor update: disabled some unnecessary loggers
10    ##
11  ##  Revision 1.7  2003/05/13 05:52:58  joko  ##  Revision 1.7  2003/05/13 05:52:58  joko
12  ##  minor update: modified description printing logic  ##  minor update: modified description printing logic
13  ##  ##
# Line 246  sub constructor { Line 252  sub constructor {
252    
253  sub start {  sub start {
254    my $self = shift;    my $self = shift;
255    $self->log("starting", 'info');    #$self->log("starting", 'info');
256        
257    $self->loadGlobalProperties();    $self->loadGlobalProperties();
258      $self->indexTargets({ load => 1 });
259        
260    #print Dumper($self);    #print Dumper($self);
261    if (my $target = $self->{target}) {    if (my $target = $self->{target}) {
262      #$self->{targets}->{$target} = Data::Rap::Target->new( name => $target );      #$self->{targets}->{$target} = Data::Rap::Target->new( name => $target );
263      $self->log("target: $target", 'info');      #$self->log("target: $target", 'info');
264      $self->performTarget($target);      $self->performTarget($target);
265    } else {    } else {
266      my $meta_raw = $self->getTargetList();      my $meta_raw = $self->getTargetList();

Legend:
Removed from v.1.7  
changed lines
  Added in v.1.9

MailToCvsAdmin">MailToCvsAdmin
ViewVC Help
Powered by ViewVC 1.1.26 RSS 2.0 feed