From 3c1095e2427a297630f57cd9d6a7c334a634cb3d Mon Sep 17 00:00:00 2001
From: einhverfr <einhverfr@4979c152-3d1c-0410-bac9-87ea11338e46>
Date: Tue, 5 Aug 2008 20:55:59 +0000
Subject: Correcting date comparison bug

git-svn-id: https://ledger-smb.svn.sourceforge.net/svnroot/ledger-smb/trunk@2232 4979c152-3d1c-0410-bac9-87ea11338e46
---
 LedgerSMB/Form.pm | 3 +--
 1 file changed, 1 insertion(+), 2 deletions(-)

(limited to 'LedgerSMB')

diff --git a/LedgerSMB/Form.pm b/LedgerSMB/Form.pm
index 48ef9c8f..9883839c 100644
--- a/LedgerSMB/Form.pm
+++ b/LedgerSMB/Form.pm
@@ -977,7 +977,7 @@ sub datetonum {
     my ( $self, $myconfig, $date, $picture ) = @_;
 
     if ($date =~ /^\d{4}-\d{2}-\d{2}$/){
-        $date =~ s/-//;
+        $date =~ s/-//g;
         return $date;
     }
 
@@ -1003,7 +1003,6 @@ sub datetonum {
 
         $dd = substr( "0$dd", -2 );
         $mm = substr( "0$mm", -2 );
-
         $date = "$yy$mm$dd";
     }
 
-- 
cgit v1.2.3