@@ -3,7 +3,7 @@ package Install;
33#
44# Package that provides 'make install' functionality for msvc builds
55#
6- # $PostgreSQL: pgsql/src/tools/msvc/Install.pm,v 1.20 2007/09/22 20:38:10 adunstan Exp $
6+ # $PostgreSQL: pgsql/src/tools/msvc/Install.pm,v 1.21 2007/09/23 20:32:40 adunstan Exp $
77#
88use strict;
99use warnings;
@@ -50,7 +50,7 @@ sub Install
5050push (@$sample_files ,$File::Find::name );
5151}
5252 },
53- " ../.. " );
53+ " src " );
5454 CopySetOfFiles(' config files' ,$sample_files ,$target .' /share/' );
5555 CopyFiles(
5656' Import libraries' ,
@@ -81,7 +81,7 @@ sub Install
8181 [glob (" src\\ backend\\ snowball\\ stopwords\\ *.stop" ) ],
8282$target .' /share/tsearch_data/' );
8383 CopySetOfFiles(' Dictionaries sample files' ,
84- [glob (" src\\ backend\\ tsearch\\\ * _sample.*" ) ],
84+ [glob (" src\\ backend\\ tsearch\\ *_sample.*" ) ],
8585$target .' /share/tsearch_data/' );
8686 CopyContribFiles($config ,$target );
8787 CopyIncludeFiles($target );
@@ -424,7 +424,6 @@ sub GenerateNLSFiles
424424{
425425my $target =shift ;
426426my $nlspath =shift ;
427- my $D ;
428427
429428print " Installing NLS files..." ;
430429 EnsureDirectories($target ," share/locale" );
@@ -433,7 +432,7 @@ sub GenerateNLSFiles
433432sub {/ ^nls\. mk\z /s &&
434433!push (@flist ,$File::Find::name );
435434}
436- }," . " );
435+ }," src " );
437436foreach (@flist )
438437 {
439438s / nls.mk/ po/ ;