SDL: fnsince.pl: Deal with post-3.1.3 releases before 3.2.0.

From f022501d52231e175bc82b440570beb0ae1baa4b Mon Sep 17 00:00:00 2001
From: "Ryan C. Gordon" <[EMAIL REDACTED]>
Date: Wed, 27 Nov 2024 23:18:38 -0500
Subject: [PATCH] fnsince.pl: Deal with post-3.1.3 releases before 3.2.0.

---
 build-scripts/fnsince.pl | 8 ++++++--
 1 file changed, 6 insertions(+), 2 deletions(-)

diff --git a/build-scripts/fnsince.pl b/build-scripts/fnsince.pl
index 20cbb30bb205d..8e8ec48e61ab0 100755
--- a/build-scripts/fnsince.pl
+++ b/build-scripts/fnsince.pl
@@ -90,11 +90,15 @@
     my $tag = $fulltags{$release};
     my $blobname = "$tag:src/dynapi/SDL_dynapi_overrides.h";
 
-    if ($release =~ /\A3\.[01]\.\d+/) {  # make everything up to the first SDL3 prerelease look like 3.1.3 (ABI lock version).
+    if ($release =~ /\A3\.(0\.\d+|1\.[0123])/) {  # make everything up to the first SDL3 prerelease look like 3.1.3 (ABI lock version).
         $release = '3.1.3';
     }
 
-    else { $release = '3.2.0'; }  # !!! FIXME: REMOVE ME WHEN 3.2.0 SHIPS!
+    # !!! FIXME: REMOVE ME WHEN 3.2.0 SHIPS!
+    elsif (not $release =~ /\A3\.1\.\d+/) {  # a couple of releases after the initial 3.1.3, let them through.
+        $release = '3.2.0';
+    }
+    # !!! FIXME: REMOVE ME WHEN 3.2.0 SHIPS!
 
     open(PIPEFH, '-|', "git show '$blobname'") or die "Failed to read git blob '$blobname': $!\n";
     while (<PIPEFH>) {