@@ -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.26 2007/12/03 15:42:58 mha Exp $
6+ # $PostgreSQL: pgsql/src/tools/msvc/Install.pm,v 1.27 2008/02/07 13:49:00 mha Exp $
77#
88use strict;
99use warnings;
@@ -456,27 +456,27 @@ sub GenerateNLSFiles
456456print " Installing NLS files..."
457457 EnsureDirectories($target ," share/locale"
458458my @flist ;
459- File::Find::find({wanted =>
460- sub {/ ^nls\. mk\z /s
461- !push (@flist ,$File::Find::name );
462- }
459+ File::Find::find({wanted =>
460+ sub {/ ^nls\. mk\z /s
461+ !push (@flist ,$File::Find::name );
462+ }
463463 }," src"
464464foreach (@flist )
465465 {
466466s // po/
467467my $dir =$_ ;
468- next unless ($dir =~/ ([^\\ ]+)\\ po$ /
468+ next unless ($dir =~/ ([^\/ ]+)\/ po$ /
469469my $prgm =$1 ;
470470$prgm =' postgres' if ($prgm eq ' backend'
471471foreach (glob (" $dir /*.po"
472472 {
473473my $lang ;
474- next unless / ^(.* )\. po/
474+ next unless / ([^ \/ ]+ )\. po/
475475$lang =$1 ;
476476
477477 EnsureDirectories($target ," share/locale/$lang " " share/locale/$lang /LC_MESSAGES"
478478system (
479- " $nlspath \\ bin\\ msgfmt -o$target \\ share\\ locale\\ $lang \\ LC_MESSAGES\\ $prgm .mo$dir \\ $ _"
479+ " $nlspath \\ bin\\ msgfmt -o$target \\ share\\ locale\\ $lang \\ LC_MESSAGES\\ $prgm .mo$_ "
480480 )
481481 && croak(" Could not run msgfmt on$dir \\ $_ "
482482print " ."