From 9daea562a8db1033c76cbb7aec56a15f7b7cdcdf Mon Sep 17 00:00:00 2001
From: Martin Renvoize <martin.renvoize@ptfs-europe.com>
Date: Fri, 17 Dec 2021 12:20:20 +0000
Subject: [PATCH] Bug 29718: (QA follow-up) Make 'T' check case insensative

Signed-off-by: Martin Renvoize <martin.renvoize@ptfs-europe.com>

Signed-off-by: Marcel de Rooy <m.de.rooy@rijksmuseum.nl>
Signed-off-by: Fridolin Somers <fridolin.somers@biblibre.com>
---
 Koha/DateUtils.pm | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/Koha/DateUtils.pm b/Koha/DateUtils.pm
index 1df3a850e6..57fba31284 100644
--- a/Koha/DateUtils.pm
+++ b/Koha/DateUtils.pm
@@ -145,7 +145,7 @@ sub dt_from_string {
     # Add the faculative time part [hh:mm[:ss]]
     my $time_re .= qr|
             (
-                T?
+                [Tt]?
                 \s*
                 (?<hour>\d{2})
                 :
-- 
2.39.5