diff options
| author | Peter Eisentraut <peter@eisentraut.org> | 2019-12-20 12:26:01 +0100 |
|---|---|---|
| committer | Peter Eisentraut <peter@eisentraut.org> | 2019-12-20 12:29:07 +0100 |
| commit | 77f416af6e821b40649c971ded43089e0450791a (patch) | |
| tree | d309dfde6df53618a3d0e5df151f1417216cf07d | |
| parent | 8f4fb4c648ee8df00f78bee3f8099a6ae510071a (diff) | |
| download | postgresql-77f416af6e821b40649c971ded43089e0450791a.tar.gz postgresql-77f416af6e821b40649c971ded43089e0450791a.zip | |
Clean up inconsistent backslash use in paths
Most of the MSVC Perl code uses forward slashes for file paths. Make
the few places that use backslashes the same. This also helps running
that code on non-Windows.
| -rw-r--r-- | src/tools/msvc/build.pl | 4 | ||||
| -rw-r--r-- | src/tools/msvc/mkvcbuild.pl | 4 |
2 files changed, 4 insertions, 4 deletions
diff --git a/src/tools/msvc/build.pl b/src/tools/msvc/build.pl index 52abdb17b9b..2e47f24783f 100644 --- a/src/tools/msvc/build.pl +++ b/src/tools/msvc/build.pl @@ -12,9 +12,9 @@ use Cwd; use Mkvcbuild; -chdir('..\..\..') if (-d '..\msvc' && -d '..\..\..\src'); +chdir('../../..') if (-d '../msvc' && -d '../../../src'); die 'Must run from root or msvc directory' - unless (-d 'src\tools\msvc' && -d 'src'); + unless (-d 'src/tools/msvc' && -d 'src'); # buildenv.pl is for specifying the build environment settings # it should contain lines like: diff --git a/src/tools/msvc/mkvcbuild.pl b/src/tools/msvc/mkvcbuild.pl index 48672439dcf..a5e99dd0dea 100644 --- a/src/tools/msvc/mkvcbuild.pl +++ b/src/tools/msvc/mkvcbuild.pl @@ -13,9 +13,9 @@ BEGIN { use lib File::Spec->rel2abs(dirname(__FILE__)); } use Mkvcbuild; -chdir('..\..\..') if (-d '..\msvc' && -d '..\..\..\src'); +chdir('../../..') if (-d '../msvc' && -d '../../../src'); die 'Must run from root or msvc directory' - unless (-d 'src\tools\msvc' && -d 'src'); + unless (-d 'src/tools/msvc' && -d 'src'); die 'Could not find config_default.pl' unless (-f 'src/tools/msvc/config_default.pl'); |