[GT] SVN Commit r708 - branches/CPAN/lib/Finance/GeniusTrader

[GeniusTrader SVN <raphael AT geniustrader.org>]

Author: clkao
Date: 2009-11-12 17:03:44 +0100 (Thu, 12 Nov 2009)
New Revision: 708

Modified:
   branches/CPAN/lib/Finance/GeniusTrader/Tools.pm
Log:
In check_dates, only convert to DAY if timeframe is larger than DAY

Modified: branches/CPAN/lib/Finance/GeniusTrader/Tools.pm
===================================================================
--- branches/CPAN/lib/Finance/GeniusTrader/Tools.pm	2009-11-06 13:41:04 UTC (rev 707)
+++ branches/CPAN/lib/Finance/GeniusTrader/Tools.pm	2009-11-12 16:03:44 UTC (rev 708)
@@ -737,11 +737,11 @@
   }
   
   # timeframe relative date conversions
-  if ( $start && $timeframe != $DAY ) {
+  if ( $start && $timeframe > $DAY ) {
     $start = Finance::GeniusTrader::DateTime::convert_date($start, $DAY, $timeframe);
   }
 
-  if ( $end && $timeframe != $DAY ) {
+  if ( $end && $timeframe > $DAY ) {
     $end = Finance::GeniusTrader::DateTime::convert_date($end, $DAY, $timeframe);
   }