Francois Gouget : testbot/Janitor: Allow 31 character session ids.

[Alexandre Julliard]

Module: tools
Branch: master
Commit: 7171288cf54f9cb7d6b236867022df7ea4dde8c1
URL:    https://source.winehq.org/git/tools.git/?a=commit;h=7171288cf54f9cb7d6b236867022df7ea4dde8c1

Author: Francois Gouget <fgouget at codeweavers.com>
Date:   Tue Apr  7 01:50:03 2020 +0200

testbot/Janitor: Allow 31 character session ids.

Some users still have obsolete 31 character session ids that have not
expired yet.

Signed-off-by: Francois Gouget <fgouget at codeweavers.com>
Signed-off-by: Alexandre Julliard <julliard at winehq.org>

---

 testbot/bin/Janitor.pl | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

diff --git a/testbot/bin/Janitor.pl b/testbot/bin/Janitor.pl
index 8fa1782..35a7e5d 100755
--- a/testbot/bin/Janitor.pl
+++ b/testbot/bin/Janitor.pl
@@ -272,7 +272,8 @@ if (opendir(my $dh, "$DataDir/staging"))
     my $Age = int((-M $FileName) + 0.5);
     my $TTL = $JobPurgeDays ? $JobPurgeDays - $Age : undef;
 
-    if ($Entry =~ /^[0-9a-f]{32}-websubmit2?_/)
+    # FIXME: There are still some obsolete unexpired 31 characters session ids.
+    if ($Entry =~ /^[0-9a-f]{31,32}-websubmit2?_/)
     {
       # We get these files whenever a developer abandons a job submission.
       # So just delete them silently after a day.