[open-ils-commits] r19267 - branches/rel_2_0/Open-ILS/src/extras/import (miker)

svn at svn.open-ils.org svn at svn.open-ils.org
Mon Jan 24 15:29:37 EST 2011


Author: miker
Date: 2011-01-24 15:29:32 -0500 (Mon, 24 Jan 2011)
New Revision: 19267

Modified:
   branches/rel_2_0/Open-ILS/src/extras/import/parallel_pg_loader.pl
   branches/rel_2_0/Open-ILS/src/extras/import/pg_loader.pl
Log:
Fix for spurious warning (LP bug #707114)

Modified: branches/rel_2_0/Open-ILS/src/extras/import/parallel_pg_loader.pl
===================================================================
--- branches/rel_2_0/Open-ILS/src/extras/import/parallel_pg_loader.pl	2011-01-24 20:28:52 UTC (rev 19266)
+++ branches/rel_2_0/Open-ILS/src/extras/import/parallel_pg_loader.pl	2011-01-24 20:29:32 UTC (rev 19267)
@@ -107,7 +107,7 @@
 			$d =~ s/\\/\\\\/gos;
 		}
 		if ($hint eq 'bre' and $fieldcache{$hint}{fields}[$x] eq 'quality') {
-			$d = int($d);
+			$d = int($d) if ($d ne '\N');
 		}
 		push @data, $d;
 		$x++;

Modified: branches/rel_2_0/Open-ILS/src/extras/import/pg_loader.pl
===================================================================
--- branches/rel_2_0/Open-ILS/src/extras/import/pg_loader.pl	2011-01-24 20:28:52 UTC (rev 19266)
+++ branches/rel_2_0/Open-ILS/src/extras/import/pg_loader.pl	2011-01-24 20:29:32 UTC (rev 19267)
@@ -111,7 +111,7 @@
 				$d =~ s/\\/\\\\/gos;
 			}
 			if ($h eq 'bre' and $fieldcache{$h}{fields}[$x] eq 'quality') {
-				$d = int($d);
+				$d = int($d) if ($d ne '\N');
 			}
 			push @data, $d;
 			$x++;



More information about the open-ils-commits mailing list