database/postgres
database/postgres
1
0
Fork 0
mirror of https://github.com/postgres/postgres.git synced 2025-05-02 11:44:50 +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 5edf438eeb
commit 6ee01e25b7
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/;