--- trunk/run.pl	2006/07/02 21:22:26	567
+++ trunk/run.pl	2006/07/03 22:12:13	576
@@ -344,17 +344,17 @@
 						if ($marc_lint) {
 							$lint->check_record( $marc );
 							my $err = join( "\n", $lint->warnings );
-							$log->error("MARC lint detected warning on MFN $mfn\tleader:", $marc->leader(), "\n",
-								">>>>> Original imput row:\n",dump($row), "\n",
-								">>>>> Normalized MARC row:\n",dump(@marc_fields), "\n",
-								">>>>> MARC lint warnings:\n",$err,"\n"
+							$log->error("MARC lint detected warning on MFN $mfn\n",
+								"<<<<< Original imput row:\n",dump($row), "\n",
+								">>>>> Normalized MARC row: leader: [", $marc->leader(), "]\n", dump(@marc_fields), "\n",
+								"!!!!! MARC lint warnings:\n",$err,"\n"
 							) if ($err);
 						}
 
 						if ($marc_dump) {
-							$log->info("MARC record on MFN $mfn\tleader:", $marc->leader(), "\n",
-								">>>>> Original imput row:\n",dump($row), "\n",
-								">>>>> Normalized MARC row:\n",dump(@marc_fields), "\n",
+							$log->info("MARC record on MFN $mfn\n",
+								"<<<<< Original imput row:\n",dump($row), "\n",
+								">>>>> Normalized MARC row: leader: [", $marc->leader(), "]\n", dump(@marc_fields), "\n",
 							);
 						}