[GT] SVN Commit r651 - trunk/GT/DB

[GeniusTrader SVN <raphael AT geniustrader.org>]

Author: joao
Date: 2008-07-24 12:05:54 +0200 (Thu, 24 Jul 2008)
New Revision: 651

Modified:
   trunk/GT/DB/genericdbi.pm
Log:
Minor performance patch for genericdbi
http://www.geniustrader.org/lists/devel/msg02722.html



Modified: trunk/GT/DB/genericdbi.pm
===================================================================
--- trunk/GT/DB/genericdbi.pm	2008-07-24 10:04:50 UTC (rev 650)
+++ trunk/GT/DB/genericdbi.pm	2008-07-24 10:05:54 UTC (rev 651)
@@ -8,9 +8,7 @@
 use vars qw(@ISA);
 
 use GT::DB;
-use GT::Prices;
 use GT::Conf;
-use GT::DateTime;
 use DBI;
 
 @ISA = qw(GT::DB);
@@ -135,7 +133,7 @@
 =cut
 sub get_last_prices {
     my ($self, $code, $limit, $timeframe) = @_;
-    $timeframe = $DAY unless ($timeframe);
+    $timeframe = $GT::DateTime::DAY unless ($timeframe);
     $limit = 99999999 if ($limit==-1);
 
     my $q = GT::Prices->new($limit);