From 24a3611e9c20bbd410c34afcd0cfac3a481a9693 Mon Sep 17 00:00:00 2001
From: miker <miker@dcc99617-32d9-48b4-a31d-7c20da2025e4>
Date: Thu, 24 Feb 2005 16:19:11 +0000
Subject: [PATCH] make sure there is some space between interval parts

git-svn-id: svn://svn.open-ils.org/ILS/trunk@107 dcc99617-32d9-48b4-a31d-7c20da2025e4
---
 OpenSRF/src/perlmods/OpenSRF/Utils.pm | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/OpenSRF/src/perlmods/OpenSRF/Utils.pm b/OpenSRF/src/perlmods/OpenSRF/Utils.pm
index 297cade6ad..f24d7d712d 100644
--- a/OpenSRF/src/perlmods/OpenSRF/Utils.pm
+++ b/OpenSRF/src/perlmods/OpenSRF/Utils.pm
@@ -234,7 +234,7 @@ sub interval_to_seconds {
         my $interval = shift || $self;
 
         $interval =~ s/and/,/g;
-        $interval =~ s/,//g;
+        $interval =~ s/,/ /g;
 
         my $amount = 0;
         while ($interval =~ /\s*\+?\s*(\d+)\s*(\w{1})\w*\s*/g) {
-- 
2.43.2