database/postgres
database/postgres
1
0
Fork 0
mirror of https://github.com/postgres/postgres.git synced 2025-06-03 01:21:48 +03:00
Code

Fix Perl warning

Browse Source 
Use of uninitialized value $content in concatenation (.) or string
This commit is contained in:
Peter Eisentraut 2023-07-08 17:24:41 +02:00
parent 01f1f789df
commit 1421e8f3b6
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
src/test/perl/PostgreSQL/Test/Utils.pm
View File

@ -564,7 +564,7 @@ sub string_replace_file
{ {
my ($filename, $find, $replace) = @_; my ($filename, $find, $replace) = @_;
open(my $in, '<', $filename); open(my $in, '<', $filename);
my $content; my $content = '';
while (<$in>) while (<$in>)
{ {
$_ =~ s/$find/$replace/; $_ =~ s/$find/$replace/;