8 |
|
|
9 |
use Mail::Box::Manager; |
use Mail::Box::Manager; |
10 |
use Config::IniFiles; |
use Config::IniFiles; |
11 |
use MWS_plucene; |
#use MWS_plucene; |
12 |
|
use MWS_swish; |
13 |
|
|
14 |
require Exporter; |
require Exporter; |
15 |
|
|
37 |
|
|
38 |
my $index_file = $self->{config}->val('global', 'index') || croak "can't find [index] section in config file with path of index"; |
my $index_file = $self->{config}->val('global', 'index') || croak "can't find [index] section in config file with path of index"; |
39 |
|
|
40 |
$self->{index} = $self->open_index($index_file); |
$self->{mgr} = Mail::Box::Manager->new(access => 'r'); |
41 |
|
$self->{index_file} = $index_file; |
|
$self->{mgr} = Mail::Box::Manager->new; |
|
42 |
|
|
43 |
# placeholder for opened folders |
# placeholder for opened folders |
44 |
$self->{folder} = {}; |
$self->{folder} = {}; |