From: miker <miker@dcc99617-32d9-48b4-a31d-7c20da2025e4>
Date: Thu, 8 Oct 2009 20:13:03 +0000 (+0000)
Subject: use an explicit time format instead of relying on the iso8601 method
X-Git-Url: https://old-git.evergreen-ils.org/?a=commitdiff_plain;h=42abce2acb7488ccb26ff72a0f1aeced71e2c68f;p=contrib%2FConifer.git

use an explicit time format instead of relying on the iso8601 method

git-svn-id: svn://svn.open-ils.org/ILS/trunk@14315 dcc99617-32d9-48b4-a31d-7c20da2025e4
---

diff --git a/Open-ILS/src/perlmods/OpenILS/Application/Storage/Publisher/actor.pm b/Open-ILS/src/perlmods/OpenILS/Application/Storage/Publisher/actor.pm
index e03f9baebb..96fe066057 100644
--- a/Open-ILS/src/perlmods/OpenILS/Application/Storage/Publisher/actor.pm
+++ b/Open-ILS/src/perlmods/OpenILS/Application/Storage/Publisher/actor.pm
@@ -237,20 +237,20 @@ sub org_closed_overlap {
 			$before = $_dt_parser->parse_datetime( $begin );
 			$before->subtract( minutes => 1 );
 
-			while ( my $_b = org_closed_overlap($self, $client, $ou, $before->iso8601, -1, 1 ) ) {
+			while ( my $_b = org_closed_overlap($self, $client, $ou, $before->strftime('%FT%T%z'), -1, 1 ) ) {
 				$before = $_dt_parser->parse_datetime( clense_ISO8601($_b->{start}) );
 			}
-			$begin = clense_ISO8601($before->iso8601);
+			$begin = clense_ISO8601($before->strftime('%FT%T%z'));
 		}
 
 		if ( $direction >= 0 ) {
 			$after = $_dt_parser->parse_datetime( $end );
 			$after->add( minutes => 1 );
 
-			while ( my $_a = org_closed_overlap($self, $client, $ou, $after->iso8601, 1, 1 ) ) {
+			while ( my $_a = org_closed_overlap($self, $client, $ou, $after->strftime('%FT%T%z'), 1, 1 ) ) {
 				$after = $_dt_parser->parse_datetime( clense_ISO8601($_a->{end}) );
 			}
-			$end = clense_ISO8601($after->iso8601);
+			$end = clense_ISO8601($after->strftime('%FT%T%z'));
 		}
 	}
 
@@ -264,7 +264,7 @@ sub org_closed_overlap {
 
 				my $count = 1;
 				while ($hoo->$begin_open_meth eq '00:00:00' and $hoo->$begin_close_meth eq '00:00:00') {
-					$begin = clense_ISO8601($_dt_parser->parse_datetime( $begin )->subtract( days => 1)->iso8601);
+					$begin = clense_ISO8601($_dt_parser->parse_datetime( $begin )->subtract( days => 1)->strftime('%FT%T%z'));
 					$begin_dow++;
 					$begin_dow %= 7;
 					$count++;
@@ -276,7 +276,7 @@ sub org_closed_overlap {
 				if (my $closure = actor::org_unit::closed_date->db_Main->selectrow_hashref( $sql, {}, $begin, $ou )) {
 					$before = $_dt_parser->parse_datetime( $begin );
 					$before->subtract( minutes => 1 );
-					while ( my $_b = org_closed_overlap($self, $client, $ou, $before->iso8601, -1 ) ) {
+					while ( my $_b = org_closed_overlap($self, $client, $ou, $before->strftime('%FT%T%z'), -1 ) ) {
 						$before = $_dt_parser->parse_datetime( clense_ISO8601($_b->{start}) );
 					}
 				}
@@ -289,7 +289,7 @@ sub org_closed_overlap {
 	
 				$count = 1;
 				while ($hoo->$end_open_meth eq '00:00:00' and $hoo->$end_close_meth eq '00:00:00') {
-					$end = clense_ISO8601($_dt_parser->parse_datetime( $end )->add( days => 1)->iso8601);
+					$end = clense_ISO8601($_dt_parser->parse_datetime( $end )->add( days => 1)->strftime('%FT%T%z'));
 					$end_dow++;
 					$end_dow %= 7;
 					$count++;
@@ -302,10 +302,10 @@ sub org_closed_overlap {
 					$after = $_dt_parser->parse_datetime( $end );
 					$after->add( minutes => 1 );
 
-					while ( my $_a = org_closed_overlap($self, $client, $ou, $after->iso8601, 1 ) ) {
+					while ( my $_a = org_closed_overlap($self, $client, $ou, $after->strftime('%FT%T%z'), 1 ) ) {
 						$after = $_dt_parser->parse_datetime( clense_ISO8601($_a->{end}) );
 					}
-					$end = clense_ISO8601($after->iso8601);
+					$end = clense_ISO8601($after->strftime('%FT%T%z'));
 				}
 			}