sanity checking

git-svn-id: svn://svn.open-ils.org/ILS/trunk@5836 dcc99617-32d9-48b4-a31d-7c20da2025e4

diff --git a/Evergreen/src/extras/import/lib_spliter.pl b/Evergreen/src/extras/import/lib_spliter.pl
index 186c8db..aef5429 100755 (executable)
--- a/Evergreen/src/extras/import/lib_spliter.pl
+++ b/Evergreen/src/extras/import/lib_spliter.pl
@@ -60,5 +60,9 @@ for my $sname (keys %libs) {
 open FH, ">$ARGV[1]" or die "Can't open $ARGV[1] to write the map file! $!";
 print FH Data::Dumper->Dump([$lib_map],['lib_map']);
 
+warn Dumper( $dbh->selectall_hashref("SELECT * FROM actor.org_unit;" => 'id') );
+
+sleep 10;
+
 $dbh->commit;