Changeset 25119


Ignore:
Timestamp:
2012-02-21T13:48:46+13:00 (12 years ago)
Author:
jmt12
Message:

Retrieve the keys in order

File:
1 edited

Legend:

Unmodified
Added
Removed

  • main/branches/64_bit_Greenstone/greenstone2/perllib/dbutil/sqlite.pm

    r23399 r25119  
    136136
    137137
    138   my $keys_str = read_infodb_cmd($infodb_file_path,"SELECT key FROM data;");
     138  my $keys_str = read_infodb_cmd($infodb_file_path,"SELECT key FROM data ORDER BY key;");
    139139
    140140  my @keys = split(/\n/,$keys_str);
    … …  
    159159
    160160
    161   my $keys_str = read_infodb_cmd($infodb_file_path,"SELECT key FROM data;");
     161  my $keys_str = read_infodb_cmd($infodb_file_path,"SELECT key FROM data ORDER BY key;");
    162162
    163163  my @keys = split(/\n/,$keys_str);
Note: See TracChangeset for help on using the changeset viewer.