--- nfo/perl/scripts/outlook2ldap/bin/feed.pl	2003/01/19 03:34:59	1.2
+++ nfo/perl/scripts/outlook2ldap/bin/feed.pl	2003/01/23 14:44:35	1.4
@@ -1,9 +1,19 @@
 #!/usr/bin/perl
 
 ##    --------------------------------------------------------------------------------
-##    $Id: feed.pl,v 1.2 2003/01/19 03:34:59 joko Exp $
+##    $Id: feed.pl,v 1.4 2003/01/23 14:44:35 janosch Exp $
 ##    --------------------------------------------------------------------------------
 ##    $Log: feed.pl,v $
+##    Revision 1.4  2003/01/23 14:44:35  janosch
+##    Updated lib Path and some ini Fields
+##
+##    Revision 1.3  2003/01/20 16:29:48  joko
+##    + new mechanism to pass configuration-metadata to Torus:
+##    >     process => Torus->new(
+##    >       config_metadata => { file => '../etc/syncOutlookContacts.ini' },
+##    >     )
+##       and stuff ....
+##
 ##    Revision 1.2  2003/01/19 03:34:59  joko
 ##    + new command-line-arguments
 ##
@@ -26,7 +36,8 @@
 use Tie::IxHash;
 
 
-use lib qw( ../libs ../etc C:\home\amo\develop\netfrag.org\nfo\perl\libs );
+use lib qw( ../libs ../etc );
+use org::netfrag::preambel;
 use Torus::Logger;
 use Torus::Core;
 
@@ -48,9 +59,12 @@
   my $bizWorks;
   $context->set( 
     app => $bizWorks, 
-    process => Torus::Core->new(), 
+    process => Torus->new( 
+      config_metadata => { file => '../etc/syncOutlookContacts.ini' }, 
+    ), 
     logger => $logger,
-    config => { mappings => { 'LdapAddress' => 'xyz' } },
+    #config => { mappings => { 'LdapAddress' => 'xyz' } },
+    
   );
 #print Dumper($context);  
 #print Dumper($context->{process}->{bizWorks}->{backend});
@@ -210,6 +224,9 @@
         import => $import,
         prepare => $self->{opt}->{prepare},
       },
+      metadata => {
+        config => $self->{config_metadata},
+      }
     );
 
 #print Dumper(\%syncConfig);