Updated the linking config files.

    Cross-port: c10583c

diff --git a/KCLS/linking/authority_control_fields_batcher.pl b/KCLS/linking/authority_control_fields_batcher.pl
index 690ec6c..8401904 100755 (executable)
--- a/KCLS/linking/authority_control_fields_batcher.pl
+++ b/KCLS/linking/authority_control_fields_batcher.pl
@@ -50,7 +50,7 @@ use DBI;
 use JSONPrefs;
 use Getopt::Long;
 
-my $batch_size = 100;
+my $batch_size = 10;
 my $lower_bound = 0;
 
 my $result = GetOptions("lower-bound=i" => \$lower_bound,
@@ -61,13 +61,13 @@ my $result = GetOptions("lower-bound=i" => \$lower_bound,
 #my $dsn = "dbi:Pg:database=" . $egdbi->database;
 
 #my $dsn = "dbi:Pg:database=rel_2_4_1_20130821_auth_v3";
-my $dsn = "dbi:Pg:database=rel_2_4_1_20130816_200bib_kcls_v6";
+my $dsn = "dbi:Pg:database=evergreen";
 
 #if ($egdbi->host) {
 #    $dsn .= ";host=" . $egdbi->host;
 #}
 
-$dsn .= ";host=192.168.0.202";
+$dsn .= ";host=10.1.6.11";
 
 #if ($egdbi->port) {
 #    $dsn .= ";port=" . $egdbi->port;
@@ -77,7 +77,7 @@ $dsn .= ";port=5432";
 
 #my $dbh = DBI->connect($dsn,$egdbi->user,$egdbi->password);
 
-my $dbh = DBI->connect($dsn,"evergreen","evergreen");
+my $dbh = DBI->connect($dsn,"evergreen","as.oi76tqyh!a$");
 
 my $q = <<END_OF_Q;
 SELECT id

diff --git a/KCLS/linking/readme b/KCLS/linking/readme
index 37210bd..d0a970b 100644 (file)
--- a/KCLS/linking/readme
+++ b/KCLS/linking/readme
@@ -1,5 +1,7 @@
 This readme will tell you how to run the linking.  
 
+make sure JSONPrefs.pm is in the perl folder
+
 First you must modify authority_control_fields_batcher.pl with your database information and the size
 of the batches you wish to run.