diff --git a/build-scripts/wikiheaders.pl b/build-scripts/wikiheaders.pl
index 877a205c01..3deed13498 100755
--- a/build-scripts/wikiheaders.pl
+++ b/build-scripts/wikiheaders.pl
@@ -809,16 +809,21 @@ while (my $d = readdir(DH)) {
                     }
 
                     # update strings now that we know everything pending is to be applied to this declaration. Add pending blank lines and the new text.
-                    if ($blank_lines > 0) {
-                        while ($blank_lines > 0) {
-                            $additional_decl .= "\n";
-                            push @decllines, '';
-                            $blank_lines--;
+
+                    # At Sam's request, don't list property defines with functions. (See #9440)
+                    my $is_property = /\A\s*\#\s*define\s+SDL_PROP_/;
+                    if (!$is_property) {
+                        if ($blank_lines > 0) {
+                            while ($blank_lines > 0) {
+                                $additional_decl .= "\n";
+                                push @decllines, '';
+                                $blank_lines--;
+                            }
                         }
+                        $additional_decl .= "\n$_";
+                        push @decllines, $_;
+                        $lastpos = tell(FH);
                     }
-                    $additional_decl .= "\n$_";
-                    push @decllines, $_;
-                    $lastpos = tell(FH);
                 } else {
                     seek(FH, $lastpos, 0);  # re-read eaten lines again next time.
                     $lineno = $lastlineno;