/[cvs]/nfo/perl/libs/OEF/Script/AbstractFeeder.pm
ViewVC logotype

Diff of /nfo/perl/libs/OEF/Script/AbstractFeeder.pm

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

revision 1.3 by joko, Fri Feb 14 14:18:36 2003 UTC revision 1.4 by joko, Thu Feb 20 21:11:15 2003 UTC
# Line 4  Line 4 
4  ##    $Id$  ##    $Id$
5  ##    --------------------------------------------------------------------------------  ##    --------------------------------------------------------------------------------
6  ##    $Log$  ##    $Log$
7    ##    Revision 1.4  2003/02/20 21:11:15  joko
8    ##    renamed module
9    ##    modified runtime namespace hierarchy
10    ##
11  ##    Revision 1.3  2003/02/14 14:18:36  joko  ##    Revision 1.3  2003/02/14 14:18:36  joko
12  ##    + new get-/setter-methods  ##    + new get-/setter-methods
13  ##  ##
# Line 25  use warnings; Line 29  use warnings;
29  #use base 'OEF::Component::Task';  #use base 'OEF::Component::Task';
30  use base qw(  use base qw(
31    DesignPattern::Object    DesignPattern::Object
32    DesignPattern::Object::Logger    DesignPattern::Logger
33  );  );
34    
35    
# Line 180  sub sync { Line 184  sub sync {
184      #print Dumper($self);      #print Dumper($self);
185      #print Dumper($self);      #print Dumper($self);
186      #exit;      #exit;
187        
188      # checks
189        if (!$self->{app}->{storage}->{$self->{opt}->{source}}) {
190          $logger->critical("Sync source storage handle undefined!");
191        }
192        if (!$self->{app}->{storage}->{$self->{opt}->{target}}) {
193          $logger->critical("Sync target storage handle undefined!");
194        }
195    
196    # configure the synchronization-object    # configure the synchronization-object
197      $sync->configure(      $sync->configure(
198        source => {        source => {
199          storage => {          storage => {
200            #handle => $mapiStorage,            #handle => $mapiStorage,
201            handle => $self->{app}->{$self->{opt}->{source}},            handle => $self->{app}->{storage}->{$self->{opt}->{source}},
202            #isIdentAuthority => $self->{app}->{config}->{{$self->{opt}->{source}},            #isIdentAuthority => $self->{app}->{config}->{{$self->{opt}->{source}},
203            #isChecksumAuthority => 1,            #isChecksumAuthority => 1,
204            #writeProtected => 1,            #writeProtected => 1,
# Line 196  sub sync { Line 207  sub sync {
207        target => {        target => {
208          storage => {          storage => {
209            #handle => $ldapStorage,            #handle => $ldapStorage,
210            handle => $self->{app}->{$self->{opt}->{target}},            handle => $self->{app}->{storage}->{$self->{opt}->{target}},
211            #idAuthority => 1,            #idAuthority => 1,
212            #isChecksumAuthority => 1,            #isChecksumAuthority => 1,
213            #isWriteProtected => 0,            #isWriteProtected => 0,
Legend:
Removed from v.1.3  
changed lines
  Added in v.1.4
MailToCvsAdmin">MailToCvsAdmin
 ViewVC Help
Powered by ViewVC 1.1.26 RSS 2.0 feed