mirror of
https://github.com/postgres/postgres.git
synced 2025-05-02 11:44:50 +03:00
Fix Perl warning
Use of uninitialized value $content in concatenation (.) or string
This commit is contained in:
parent
5edf438eeb
commit
6ee01e25b7
@ -564,7 +564,7 @@ sub string_replace_file
|
||||
{
|
||||
my ($filename, $find, $replace) = @_;
|
||||
open(my $in, '<', $filename);
|
||||
my $content;
|
||||
my $content = '';
|
||||
while (<$in>)
|
||||
{
|
||||
$_ =~ s/$find/$replace/;
|
||||
|
Loading…
x
Reference in New Issue
Block a user