Index: Install.pm
===================================================================
RCS file: /cvsroot/pgsql/src/tools/msvc/Install.pm,v
retrieving revision 1.26
diff -c -r1.26 Install.pm
*** Install.pm	3 Dec 2007 15:42:58 -0000	1.26
--- Install.pm	7 Feb 2008 11:15:50 -0000
***************
*** 456,482 ****
      print "Installing NLS files...";
      EnsureDirectories($target, "share/locale");
  	my @flist;
! 	File::Find::find({wanted => 
! 						  sub { /^nls\.mk\z/s && 
! 									!                                                                       push(@flist, $File::Find::name); 	
! 							} 
  				  }, "src");
      foreach (@flist)
      {
          s/nls.mk/po/;
          my $dir = $_;
!         next unless ($dir =~ /([^\\]+)\\po$/);
          my $prgm = $1;
          $prgm = 'postgres' if ($prgm eq 'backend');
          foreach (glob("$dir/*.po"))
          {
              my $lang;
!             next unless /^(.*)\.po/;
              $lang = $1;
  
              EnsureDirectories($target, "share/locale/$lang", "share/locale/$lang/LC_MESSAGES");
              system(
! "$nlspath\\bin\\msgfmt -o $target\\share\\locale\\$lang\\LC_MESSAGES\\$prgm.mo $dir\\$_"
                )
                && croak("Could not run msgfmt on $dir\\$_");
              print ".";
--- 456,482 ----
      print "Installing NLS files...";
      EnsureDirectories($target, "share/locale");
  	my @flist;
! 	File::Find::find({wanted =>
! 						  sub { /^nls\.mk\z/s &&
! 									!push(@flist, $File::Find::name);
! 							}
  				  }, "src");
      foreach (@flist)
      {
          s/nls.mk/po/;
          my $dir = $_;
!         next unless ($dir =~ /([^\/]+)\/po$/);
          my $prgm = $1;
          $prgm = 'postgres' if ($prgm eq 'backend');
          foreach (glob("$dir/*.po"))
          {
              my $lang;
!             next unless /([^\/]+)\.po/;
              $lang = $1;
  
              EnsureDirectories($target, "share/locale/$lang", "share/locale/$lang/LC_MESSAGES");
              system(
! "$nlspath\\bin\\msgfmt -o $target\\share\\locale\\$lang\\LC_MESSAGES\\$prgm.mo $_"
                )
                && croak("Could not run msgfmt on $dir\\$_");
              print ".";