*** /usr/local/TeX/texmf-context/scripts/context/perl/texexec.pl	2005-04-21 18:16:27.000000000 -0400
--- /usr/local/TeX/texmf-local/scripts/context/perl/texexec.pl	2005-05-09 14:39:51.000000000 -0400
***************
*** 2305,2313 ****
          # fall back
          if ($FormatPath eq '') {
              if (($UseEnginePath)&&($EngineDone)) {
!                 $FormatPath = `$kpsewhich --engine=$EnginePath --expand-var=\$TEXFORMATS` ;
              } else {
!                 $FormatPath = `$kpsewhich --expand-var=\$TEXFORMATS` ;
              }
          }
          chomp $FormatPath ;
--- 2305,2313 ----
          # fall back
          if ($FormatPath eq '') {
              if (($UseEnginePath)&&($EngineDone)) {
!                 $FormatPath = `$kpsewhich --engine=$EnginePath --expand-var=\\\$TEXFORMATS` ;
              } else {
!                 $FormatPath = `$kpsewhich --expand-var=\\\$TEXFORMATS` ;
              }
          }
          chomp $FormatPath ;
***************
*** 2474,2480 ****
          $texformats = '' ;
      }
      if ($texformats eq '') {
!         $texformats = `kpsewhich --expand-var=\$TEXFORMATS`.chomp ;
      }
      if ($texformats !~ /web2c[\/\\].*\$ENGINE/) {
          $texformats =~ s/web2c/web2c\/{\$ENGINE,}/ ;
--- 2474,2481 ----
          $texformats = '' ;
      }
      if ($texformats eq '') {
!         $texformats = `kpsewhich --expand-var=\\\$TEXFORMATS` ;
!         chomp($texformats) ;
      }
      if ($texformats !~ /web2c[\/\\].*\$ENGINE/) {
          $texformats =~ s/web2c/web2c\/{\$ENGINE,}/ ;