commit e724fa2b721bb259419a0b62bacbea33a64856da
Author: Francois Gouget <fgouget@free.fr>
Date:   Sat Mar 28 20:06:47 2009 +0100

    winemaker: Better deal with case sensitivity issues in source_scan_project_file().

diff --git a/tools/winemaker b/tools/winemaker
index 2a878a6..d8c96d7 100755
--- a/tools/winemaker
+++ b/tools/winemaker
@@ -777,20 +777,8 @@ sub source_scan_project_file($$$)
                 #$libflag = 1;
                 next;
             } elsif (/^SOURCE=(.*)$/) {
-                $sfilet=$1;
-                if (($opt_lower == $OPT_LOWER_ALL and $sfilet =~ /[A-Z]/) or ($opt_lower == $OPT_LOWER_UPPERCASE and $sfilet !~ /[a-z]/)) {
-                    $sfilet=lc $sfilet; #to lowercase if necessary
-                }
-                $sfilet=~s/\\\\/\\/g; #remove double backslash
-                $sfilet=~s/^\.\\//; #remove starting 'this directory'
-                $sfilet=~s/\\/\//g; #make slashes out of backslashes
-                #    if ($sfilet =~ /^((\.\.\/)+)/){
-                #        print "Fix files and directories in $1 ? y or n: ";
-                #
-                #      if (<STDIN>=~/^y/i) {
-                #      fix_file_and_directory_names("$1"); #referenced files in upper directories? fix them!
-                #      }
-                #    }
+                my @components=split /[\/\\]+/, $1;
+                $sfilet=search_from($path, \@components);
                 if ($sfilet =~ /\.(exe|dll)$/i) {
                     $targets{$sfilet}=1;
                 } elsif ($sfilet =~ /\.c$/i and $sfilet !~ /\.(dbg|spec)\.c$/) {