diff options
| author | Tom Lane <tgl@sss.pgh.pa.us> | 2017-08-02 15:07:20 -0400 |
|---|---|---|
| committer | Tom Lane <tgl@sss.pgh.pa.us> | 2017-08-02 15:07:20 -0400 |
| commit | af1f1825924b5f983bfa6a2cd0df41d962fb9032 (patch) | |
| tree | 450bdcc6fa5ada9cfa2c583c00fb88fd814408ee | |
| parent | ca99f5b5fd90828f150714021f517de46a47dfe6 (diff) | |
Silence warning from modern perl about unescaped braces
Back-patch commit 76a1c97bf21c301f61bb41345e0cdd0d365b2086 into
the older branches (9.5 and before). This is needed because perl
5.26 and later treats the case as an error not just a warning.
Original patch by Andrew Dunstan, need for back-patch noted by
Ashutosh Sharma
Discussion: https://postgr.es/m/CAE9k0PkfNcmj9pA7Yx4qQ=K=3aY4TuiRhp7KYpayDWm9MYsnjg@mail.gmail.com
| -rw-r--r-- | src/tools/msvc/Install.pm | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/tools/msvc/Install.pm b/src/tools/msvc/Install.pm index 2d037ddf8ab..4e75ead060a 100644 --- a/src/tools/msvc/Install.pm +++ b/src/tools/msvc/Install.pm @@ -217,7 +217,7 @@ sub CopySolutionOutput my $conf = shift; my $target = shift; my $rem = - qr{Project\("{8BC9CEB8-8B4A-11D0-8D11-00A0C91BC942}"\) = "([^"]+)"}; + qr{Project\("\{8BC9CEB8-8B4A-11D0-8D11-00A0C91BC942\}"\) = "([^"]+)"}; my $sln = read_file("pgsql.sln") || croak "Could not open pgsql.sln\n"; |