experimental branch to improve spot query

[spider.git] / perl / DXSql / SQLite.pm

diff --git a/perl/DXSql/SQLite.pm b/perl/DXSql/SQLite.pm
index 2330837f41cd4b2192dc2821f926ff917c00653b..36bcc46da72554ae53721a85b147f8f6868b0e6b 100644 (file)
--- a/perl/DXSql/SQLite.pm
+++ b/perl/DXSql/SQLite.pm
@@ -80,9 +80,13 @@ sub spot_add_indexes
 {
        my $self = shift;
        dbg('adding spot index ix1');
-       $self->do('create index spot_ix1 on spot(time desc)');
+       $self->do('create index spot_ix1 on spot(time asc)');
        dbg('adding spot index ix2');
        $self->do('create index spot_ix2 on spot(spotcall asc)');
+       dbg('adding spot index ix3');
+       $self->do('create index spot_ix3 on spot(freq asc)');
+       dbg('adding spot index ix4');
+       $self->do('create index spot_ix4 on spot(spotter asc)');
 }