File tree Expand file tree Collapse file tree 1 file changed +4
-9
lines changed Expand file tree Collapse file tree 1 file changed +4
-9
lines changed Original file line number Diff line number Diff line change @@ -3,7 +3,7 @@ package Mkvcbuild;
33#
44# Package that generates build files for msvc build
55#
6- # $PostgreSQL: pgsql/src/tools/msvc/Mkvcbuild.pm,v 1.45 2010/01/09 14:45:47 adunstan Exp $
6+ # $PostgreSQL: pgsql/src/tools/msvc/Mkvcbuild.pm,v 1.46 2010/01/11 14:16:18 adunstan Exp $
77#
88use Carp;
99use Win32;
@@ -117,18 +117,13 @@ sub mkvcbuild
117117 . ' text2macro.pl '
118118 . ' --strip="^(\#.*|\s*)$$" '
119119 . ' plc_perlboot.pl plc_safe_bad.pl plc_safe_ok.pl '
120- . ' >perlchunks.htmp ' );
120+ . ' >perlchunks.h ' );
121121 chdir $basedir ;
122- if ((!(-f ' src\pl\plperl\perlchunks.htmp ' )) || -z ' src\pl\plperl\perlchunks.htmp ' )
122+ if ((!(-f ' src\pl\plperl\perlchunks.h ' )) || -z ' src\pl\plperl\perlchunks.h ' )
123123 {
124- unlink (' src\pl\plperl\perlchunks.htmp ' ); # if zero size
124+ unlink (' src\pl\plperl\perlchunks.h ' ); # if zero size
125125 die ' Failed to create perlchunks.h' . " \n " ;
126126 }
127- else
128- {
129- move(' src\pl\plperl\perlchunks.htmp' ,' src\pl\plperl\perlchunks.h' );
130- }
131-
132127 }
133128 $plperl -> AddReference($postgres );
134129 my @perl_libs = grep {/ perl\d +.lib$ / }
You can’t perform that action at this time.
0 commit comments