Index: go-pear
===================================================================
RCS file: /repository/pearweb/public_html/go-pear,v
retrieving revision 1.62
diff -u -r1.62 go-pear
--- go-pear	23 May 2004 20:21:18 -0000	1.62
+++ go-pear	1 Jun 2004 15:45:43 -0000
@@ -784,7 +784,7 @@
     }
 
     $pear_cmd = $bin_dir . DIRECTORY_SEPARATOR . 'pear';
-    $pear_cmd .= WINDOWS?'.bat':'';
+    $pear_cmd = WINDOWS ? strtolower($pear_cmd).'.bat' : $pear_cmd;
 
     // check that the installed pear and the one in tha path are the same (if any)
     $pear_old = which('pear', $bin_dir);
@@ -992,7 +992,7 @@
                 file_exists($ret = "$tmp.com") ||
                 file_exists($ret = "$tmp.bat") ||
                 file_exists($ret = "$tmp.cmd")) {
-                return $ret;
+                return strtolower($ret);
             }
         }
     } else {