--- nfo/perl/libs/Data/Transfer/Sync/API.pm	2003/02/14 12:58:47	1.6
+++ nfo/perl/libs/Data/Transfer/Sync/API.pm	2003/02/21 08:00:24	1.7
@@ -1,4 +1,4 @@
-##    $Id: API.pm,v 1.6 2003/02/14 12:58:47 joko Exp $
+##    $Id: API.pm,v 1.7 2003/02/21 08:00:24 joko Exp $
 ##
 ##    Copyright (c) 2002  Andreas Motl <andreas.motl@ilo.de>
 ##
@@ -6,6 +6,9 @@
 ##
 ##    ----------------------------------------------------------------------------------------
 ##    $Log: API.pm,v $
+##    Revision 1.7  2003/02/21 08:00:24  joko
+##    debugging
+##
 ##    Revision 1.6  2003/02/14 12:58:47  joko
 ##    + re-enabled the erase-mechanism
 ##
@@ -151,7 +154,7 @@
   my $self = shift;
   my $args = shift;
 
-  $logger->notice( "==========================   " . __PACKAGE__ . "->syncNodes   ==============");
+  #$logger->notice( "==========================   " . __PACKAGE__ . "->syncNodes   ==============");
   $logger->debug( __PACKAGE__ . "->syncNodes: starting" );
 
 #print Dumper($self);
@@ -242,7 +245,17 @@
     #print Dumper($self);
     #exit;
 
-  $logger->info( __PACKAGE__ . "->syncNodes: source=$self->{meta}->{source}->{dbKey}/$self->{meta}->{source}->{nodeName} [$self->{meta}->{source}->{nodeType}] $direction_arrow target=$self->{meta}->{target}->{dbKey}/$self->{meta}->{target}->{nodeName} [$self->{meta}->{target}->{nodeType}]" );
+  # V1:
+  $logger->debug( __PACKAGE__ . "->syncNodes: source=$self->{meta}->{source}->{dbKey}/$self->{meta}->{source}->{nodeName} [$self->{meta}->{source}->{nodeType}] $direction_arrow target=$self->{meta}->{target}->{dbKey}/$self->{meta}->{target}->{nodeName} [$self->{meta}->{target}->{nodeType}]" );
+  
+  # V2:
+  my $what = "$self->{meta}->{source}->{dbKey}/$self->{meta}->{source}->{nodeName} [$self->{meta}->{source}->{nodeType}] $direction_arrow $self->{meta}->{target}->{dbKey}/$self->{meta}->{target}->{nodeName} [$self->{meta}->{target}->{nodeType}]";
+  #my $header = ("~.." x 7) . "  " . $what . "  " . ("~.." x 4);
+  #my $header = ("= " x 7) . "  " . $what . "  " . ("= " x 4);
+  #my $header = ("~=-_-=" x 3) . "  " . $what . "  " . ("~=-_-=" x 4);
+  my $header = ("_-=~=-" x 4) . "  " . $what . "  " . ("_-=~=-" x 4);
+  $logger->notice($header);
+
 
   return if !$self->buildFieldmapping();
   return if !$self->_touchNodeSet();
@@ -309,7 +322,8 @@
 EOT
   
   
-  $logger->notice( $ql );
+  chomp($ql);
+  $logger->info($ql);
   
   #exit;
   return;