commit b59a9c7622e21bce723e67a59c0b0aad3809dd82
author Patrik Stridvall <ps@leissner.se> Thu Jul 12 22:22:05 2001 +0000
committer Alexandre Julliard <julliard@winehq.org> Thu Jul 12 22:22:05 2001 +0000
tree 246bdafbcf0790f2c087b673dd4a2eacdaae590c
parent 987ea4688b5091442ee9e43a2621cf55e7aac095

Several additions and bug fixes.

tools/winapi/winapi_fixup

diff --git a/tools/winapi/winapi_fixup b/tools/winapi/winapi_fixup
index e10ba0f..3b214d8 100755
--- a/tools/winapi/winapi_fixup
+++ b/tools/winapi/winapi_fixup
@@ -117,7 +117,17 @@
 
 	$output->prefix("$file: " . $function->prefix);
 
-	my @module_ordinal_entries = $function->get_all_module_ordinal;
+	my @module_ordinal_entries = ();
+	foreach my $entry2 ($function->get_all_module_ordinal) {
+	    (my $external_name2, my $module2, my $ordinal2) = @$entry2;
+	    if(($external_name2 eq "@" ||
+		($win16api->is_module($module2) && !$win16api->is_function_stub_in_module($module2, $external_name2)) ||
+		($win32api->is_module($module2) && !$win32api->is_function_stub_in_module($module2, $external_name2))) &&
+	       $modules->is_allowed_module_in_file($module2, "$current_dir/$file"))
+	    {
+		push @module_ordinal_entries, $entry2; 
+	    }
+	}
 
 	my $spec_modified = 0;
 
@@ -398,7 +408,7 @@
 		    my $found = 0;
 		    foreach my $entry2 (@module_ordinal_entries) {
 			(my $external_name2, my $module2, my $ordinal2) = @$entry2;
-		    
+
 			if($external_name eq $external_name2 &&
 			   lc($module) eq $module2 &&
 			   $ordinal eq $ordinal2)