[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[GT] SVN Commit r592 - trunk/GT/DB
Author: thomas
Date: 2008-03-23 15:05:30 +0100 (Sun, 23 Mar 2008)
New Revision: 592
Modified:
trunk/GT/DB/HTTP.pm
trunk/GT/DB/Text.pm
Log:
Fix reset of config options by removing unnecessary assignment. If desired use: if(\!defined ...
Modified: trunk/GT/DB/HTTP.pm
===================================================================
--- trunk/GT/DB/HTTP.pm 2008-03-23 05:28:53 UTC (rev 591)
+++ trunk/GT/DB/HTTP.pm 2008-03-23 14:05:30 UTC (rev 592)
@@ -186,16 +186,6 @@
my $prices = GT::Prices->new();
$prices->set_timeframe($timeframe);
- if (!$self->{'mark'}) { $self->{'mark'} = "\t"; }
- if (!$self->{'date_format'}) { $self->{'date_format'} = 3; }
- if (!$self->{'header_lines'}) { $self->{'header_lines'} = 0; }
- if (!$self->{'open'}) { $self->{'open'} = 0; }
- if (!$self->{'high'}) { $self->{'high'} = 1; }
- if (!$self->{'low'}) { $self->{'low'} = 2; }
- if (!$self->{'close'}) { $self->{'close'} = 3; }
- if (!$self->{'volume'}) { $self->{'volume'} = 4; }
- if (!$self->{'date'}) { $self->{'datetime'} = 5; }
-
my %fields = ('open' => $self->{'open'}, 'high' => $self->{'high'},
'low' => $self->{'low'}, 'close' => $self->{'close'},
'volume' => $self->{'volume'}, 'date' => $self->{'datetime'});
Modified: trunk/GT/DB/Text.pm
===================================================================
--- trunk/GT/DB/Text.pm 2008-03-23 05:28:53 UTC (rev 591)
+++ trunk/GT/DB/Text.pm 2008-03-23 14:05:30 UTC (rev 592)
@@ -179,16 +179,6 @@
my $prices = GT::Prices->new;
$prices->set_timeframe($timeframe);
- if (!$self->{'mark'}) { $self->{'mark'} = "\t"; }
- if (!$self->{'date_format'}) { $self->{'date_format'} = 3; }
- if (!$self->{'header_lines'}) { $self->{'header_lines'} = 0; }
- if (!$self->{'open'}) { $self->{'open'} = 0; }
- if (!$self->{'high'}) { $self->{'high'} = 1; }
- if (!$self->{'low'}) { $self->{'low'} = 2; }
- if (!$self->{'close'}) { $self->{'close'} = 3; }
- if (!$self->{'volume'}) { $self->{'volume'} = 4; }
- if (!$self->{'datetime'}) { $self->{'datetime'} = 5; }
-
my %fields = ('open' => $self->{'open'}, 'high' => $self->{'high'},
'low' => $self->{'low'}, 'close' => $self->{'close'},
'volume' => $self->{'volume'}, 'date' => $self->{'datetime'});