65 |
|
|
66 |
my $data = {@_}; |
my $data = {@_}; |
67 |
|
|
|
confess("need path and headline!") unless (defined($data->{'path'}) && defined($data->{'headline'})); |
|
|
|
|
68 |
my $log = $self->_get_logger(); |
my $log = $self->_get_logger(); |
69 |
|
|
70 |
|
$log->logconfess("need path and headline!") unless (defined($data->{'path'}) && defined($data->{'headline'})); |
71 |
|
|
72 |
push @{$self->{'index'}}, $data; |
push @{$self->{'index'}}, $data; |
73 |
|
|
74 |
$log->debug("stored path: ",$data->{'path'}," headline: ",$data->{'headline'}); |
$log->debug("stored path: ",$data->{'path'}," headline: ",$data->{'headline'}); |