Remove unneeded variable

nigelhorne · Feb 4, 2024 · cd12fbe · cd12fbe
1 parent 1eede0d
commit cd12fbe
Showing 1 changed file with 1 addition and 2 deletions.
diff --git a/gedcom b/gedcom
@@ -9249,9 +9249,8 @@ sub place {
 				# die "TODO: add language $language";
 			# }
 			# FIXME: should be table driven
-			my $to = $lang;
 			$rc->en($place);
-			if(my $t = $places->translate({ place => $1, from => 'en', to => $to })) {
+			if(my $t = $places->translate({ place => $1, from => 'en', to => $lang })) {
 				$place = "$t$2, $3";
 				$rc->set(lang => $lang, string => $place);
 			}