From 0c732850d22a2dddb8a2ef64aed3c23731488caa Mon Sep 17 00:00:00 2001
From: Heikki Linnakangas <heikki.linnakangas@iki.fi>
Date: Fri, 7 Apr 2017 19:19:50 +0300
Subject: [PATCH] Remove duplicate assignment.

Harmless, but clearly wrong.

Kyotaro Horiguchi
---
 src/backend/utils/mb/Unicode/convutils.pm | 3 +--
 1 file changed, 1 insertion(+), 2 deletions(-)

diff --git a/src/backend/utils/mb/Unicode/convutils.pm b/src/backend/utils/mb/Unicode/convutils.pm
index 479bfe92896..42b4ffaaef9 100644
--- a/src/backend/utils/mb/Unicode/convutils.pm
+++ b/src/backend/utils/mb/Unicode/convutils.pm
@@ -49,8 +49,7 @@ sub read_source
 			print STDERR "READ ERROR at line $. in $fname: $_\n";
 			exit;
 		}
-		my $out = {f => $fname, l => $.,
-				   code => hex($1),
+		my $out = {code => hex($1),
 				   ucs => hex($2),
 				   comment => $4,
 				   direction => BOTH,
-- 
2.39.5