[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[GT] Minor performance patch for genericdbi.pm
This database module is including other modules which it doesn't need.
This should be a seamless patch.
Index: DB/genericdbi.pm
===================================================================
--- DB/genericdbi.pm (revision 647)
+++ DB/genericdbi.pm (working copy)
@@ -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);