From 6de7c4d6790369eaab3c7d6958c42fabeb1dc53f Mon Sep 17 00:00:00 2001
From: miker <miker@9efc2488-bf62-4759-914b-345cdb29e865>
Date: Thu, 20 Apr 2006 01:24:34 +0000
Subject: [PATCH] date clensing works properly now... oops

git-svn-id: svn://svn.open-ils.org/OpenSRF/trunk@696 9efc2488-bf62-4759-914b-345cdb29e865
---
 src/perlmods/OpenSRF/Utils.pm | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/src/perlmods/OpenSRF/Utils.pm b/src/perlmods/OpenSRF/Utils.pm
index 44ddcd2..36e794d 100644
--- a/src/perlmods/OpenSRF/Utils.pm
+++ b/src/perlmods/OpenSRF/Utils.pm
@@ -363,7 +363,7 @@ sub clense_ISO8601 {
 	if ($date =~ /^\s*(\d{4})-?(\d{2})-?(\d{2})/o) {
 		my $new_date = "$1-$2-$3";
 
-		if ($date =~/(?:$new_date).(\d{2}):(\d{2}):(\d{2})/o) {
+		if ($date =~/(\d{2}):(\d{2}):(\d{2})/o) {
 			$new_date .= "T$1:$2:$3";
 
 			my $z;
-- 
2.43.2