From: Dan Scott <dscott@laurentian.ca>
Date: Thu, 11 Oct 2012 22:29:28 +0000 (-0400)
Subject: Recalls - cleanse the incoming due date to ISO8601
X-Git-Url: https://old-git.evergreen-ils.org/?a=commitdiff_plain;h=9c5616dd15147d45d369f7a0e4df1dcbfcec34b9;p=contrib%2FConifer.git

Recalls - cleanse the incoming due date to ISO8601

Gotta have that missing "T" or else you're going to suffer. And suffer.

Signed-off-by: Dan Scott <dscott@laurentian.ca>
---

diff --git a/Open-ILS/src/perlmods/lib/OpenILS/Application/Storage/Publisher/action.pm b/Open-ILS/src/perlmods/lib/OpenILS/Application/Storage/Publisher/action.pm
index 64fc01ba3b..5f7c0cf81d 100644
--- a/Open-ILS/src/perlmods/lib/OpenILS/Application/Storage/Publisher/action.pm
+++ b/Open-ILS/src/perlmods/lib/OpenILS/Application/Storage/Publisher/action.pm
@@ -1627,7 +1627,7 @@ sub process_recall {
         }
 
         # Ensure that new loan period is not longer than original due date, if it is, stick with original date
-        if (DateTime->compare(DateTime::Format::ISO8601->parse_datetime($circ->due_date),DateTime::Format::ISO8601->parse_datetime($return_date)) == -1) {
+        if (DateTime->compare(DateTime::Format::ISO8601->parse_datetime(cleanse_ISO8601($circ->due_date)),DateTime::Format::ISO8601->parse_datetime($return_date)) == -1) {
            $return_date = $circ->due_date;
         };