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

[GeniusTrader SVN <raphael AT geniustrader.org>]

Author: clkao
Date: 2009-11-06 14:34:23 +0100 (Fri, 06 Nov 2009)
New Revision: 701

Modified:
   branches/CPAN/lib/Finance/GeniusTrader/DB/HTTP.pm
Log:
Fix loadtxt() usage in Finance::GeniusTrader::DB::HTTP.

Submitted by Yen-Ming Lee <leeym
AT
leeym.org>

Modified: branches/CPAN/lib/Finance/GeniusTrader/DB/HTTP.pm
===================================================================
--- branches/CPAN/lib/Finance/GeniusTrader/DB/HTTP.pm	2009-11-06 13:33:06 UTC (rev 700)
+++ branches/CPAN/lib/Finance/GeniusTrader/DB/HTTP.pm	2009-11-06 13:34:23 UTC (rev 701)
@@ -269,7 +269,7 @@
 	print CACHE $res->content;
 	close CACHE;
 	my $new_prices = Finance::GeniusTrader::Prices->new();
-	$new_prices->loadtxt("$cache_file.tmp", $self->{'mark'}, $self->{'date_format'}, %{$self->{'fields'}});
+	$new_prices->loadtxt("$cache_file.tmp", $self->{'mark'}, $self->{'date_format'}, $self->{'header_lines'}, %{$self->{'fields'}});
 	$new_prices->set_timeframe($DAY);
 	for(my $i = 0; $i < $new_prices->count(); $i++) {
 	    if ($prices->has_date($new_prices->at($i)->[$DATE])) {