Fixed bug with valid qualifier missing from eq_companionship table access during...

[eq/.git] / import_ward_data

diff --git a/import_ward_data b/import_ward_data
index a691a91446f9f3e8f6e080ecf7945969d30c45f6..522386eeb47786ab195f404b28a2753985f8adbe 100755 (executable)
--- a/import_ward_data
+++ b/import_ward_data
@@ -265,7 +265,7 @@ sub update_eq_companionship_table
                    my $rows = scalar @data;
                    if($rows == 0) {
                        # No existing records found for this companionship, make a new entry
-                       print "   Adding Elder to companionship: $elder_name -> $id\n";
+                       print "   Adding Companion to companionship: $elder_name -> $id\n";
                        $sth = $dbh->prepare("insert into eq_companionship values ($id,'$elder','$aaronic','$district',1)");
                        $sth->execute or die "-E- DB error: $DBI::errstr\n";
                    } else {