mirror of
https://github.com/postgres/postgres.git
synced 2025-07-30 11:03:19 +03:00
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.
This commit is contained in:
@ -12,9 +12,9 @@ use Cwd;
|
|||||||
|
|
||||||
use Mkvcbuild;
|
use Mkvcbuild;
|
||||||
|
|
||||||
chdir('..\..\..') if (-d '..\msvc' && -d '..\..\..\src');
|
chdir('../../..') if (-d '../msvc' && -d '../../../src');
|
||||||
die 'Must run from root or msvc directory'
|
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
|
# buildenv.pl is for specifying the build environment settings
|
||||||
# it should contain lines like:
|
# it should contain lines like:
|
||||||
|
@ -13,9 +13,9 @@ BEGIN { use lib File::Spec->rel2abs(dirname(__FILE__)); }
|
|||||||
|
|
||||||
use Mkvcbuild;
|
use Mkvcbuild;
|
||||||
|
|
||||||
chdir('..\..\..') if (-d '..\msvc' && -d '..\..\..\src');
|
chdir('../../..') if (-d '../msvc' && -d '../../../src');
|
||||||
die 'Must run from root or msvc directory'
|
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'
|
die 'Could not find config_default.pl'
|
||||||
unless (-f 'src/tools/msvc/config_default.pl');
|
unless (-f 'src/tools/msvc/config_default.pl');
|
||||||
|
Reference in New Issue
Block a user