From 207eac1f120b74ff6cef13bc7d74173a15c553d3 Mon Sep 17 00:00:00 2001 From: Nigel Horne Date: Mon, 28 Aug 2023 18:53:27 -0400 Subject: [PATCH] Remove dbpedia false-positive --- ged2site | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/ged2site b/ged2site index dd5b3efb..a013acee 100755 --- a/ged2site +++ b/ged2site @@ -7543,7 +7543,7 @@ sub print_person # print $csv notes({ person => $person, record => $death }); # } - if($opts{'w'} && (my $dbpedia = dbpedia({ person => $person, birth_dt => $birth_dt, yod => $yod }))) { + if($opts{'w'} && (my $dbpedia = dbpedia({ person => $person, birth_dt => $birth_dt, yob => $yob, yod => $yod }))) { } if(($person->get_value('note')) && @@ -13532,7 +13532,7 @@ sub dbpedia my $person = $params{'person'}; my $yod = $params{'yod'}; my $birth_dt = $params{'birth_dt'}; - my $yob; + my $yob = $params{'yob'}; if(defined($birth_dt) && $birth_dt) { if(!ref($birth_dt)) {