Ticket #267: search_pagination.diff

File search_pagination.diff, 5.0 KB (added by bob, 13 years ago)
  • templates/search.tt

     
    8080      <p>
    8181      Matches [% first_num %] - [% last_num %] of [% total_num %].
    8282      [% IF (first_num > 20) %]
    83         <a href="search.cgi?search=[% search_terms %];next=[% first_num - 21 %]">Previous 20 results</a>
     83        <a href="search.cgi?search=[% search_terms %];[% dist_field %]=[% dist %];[% coord_field_1 %]=[% coord_field_1_value %];[% coord_field_2 %]=[% coord_field_2_value %];next=[% first_num - 21 %]">Previous 20 results</a>
    8484      [% END %]
    8585      [% IF ((first_num > 20) and next_page_startpos) %]
    8686      /
  • t/34_search_paging.t

     
    1616    plan skip_all => "Plucene not installed";
    1717}
    1818
    19 plan tests => 9;
     19plan tests => 18;
    2020
    2121# Clear out the database from any previous runs.
    2222unlink "t/node.db";
     
    3434    skip "Geography::NationalGrid::GB not installed", 3 if $@;
    3535    $config->geo_handler( 1 );
    3636
    37     foreach my $i ( 1 .. 30 ) {
     37    foreach my $i ( 1 .. 50 ) {
    3838        OpenGuides::Test->write_data(
    3939                                      guide      => $guide,
    4040                                      node       => "Crabtree Tavern $i",
     
    5050                                                  os_dist => 1500,
    5151                                                  os_x => 523500,
    5252                                                  os_y => 177500,
     53                                                 next => 21,
    5354                                                },
    5455                             );
    5556    like( $output, qr/search.cgi\?.*os_x=523500.*Next.*results/s,
     
    5859          "os_y retained in next page link" );
    5960    like( $output, qr/search.cgi\?.*os_dist=1500.*Next.*results/s,
    6061          "os_dist retained in next page link" );
     62    like( $output, qr/search.cgi\?.*os_x=523500.*Previous.*results/s,
     63          "os_x retained in previous page link" );
     64    like( $output, qr/search.cgi\?.*os_y=177500.*Previous.*results/s,
     65          "os_y retained in previous page link" );
     66    like( $output, qr/search.cgi\?.*os_dist=1500.*Previous.*results/s,
     67          "os_dist retained in previous page link" );
    6168}
    6269
    6370# Test with OSIE co-ords.
     
    7077    $config->geo_handler( 2 );
    7178    my $search = OpenGuides::Search->new( config => $config );
    7279
    73     foreach my $i ( 1 .. 30 ) {
     80    foreach my $i ( 1 .. 50 ) {
    7481        OpenGuides::Test->write_data(
    7582                                      guide      => $guide,
    7683                                      node       => "I Made This Place Up $i",
     
    8592                                                  osie_dist => 1500,
    8693                                                  osie_x => 100000,
    8794                                                  osie_y => 200000,
     95                                                  next => 21,
    8896                                                },
    8997                             );
    9098    like( $output, qr/search.cgi\?.*osie_x=100000.*Next.*results/s,
     
    93101          "osie_y retained in next page link" );
    94102    like( $output, qr/search.cgi\?.*osie_dist=1500.*Next.*results/s,
    95103          "osie_dist retained in next page link" );
     104    like( $output, qr/search.cgi\?.*osie_x=100000.*Previous.*results/s,
     105          "osie_x retained in previous page link" );
     106    like( $output, qr/search.cgi\?.*osie_y=200000.*Previous.*results/s,
     107          "osie_y retained in previous page link" );
     108    like( $output, qr/search.cgi\?.*osie_dist=1500.*Previous.*results/s,
     109          "osie_dist retained in previous page link" );
    96110}
    97111
    98112# Test with UTM.
     
    105119    $config->geo_handler( 3 );
    106120    my $search = OpenGuides::Search->new( config => $config );
    107121
    108     foreach my $i ( 1 .. 30 ) {
     122    foreach my $i ( 1 .. 50 ) {
    109123        OpenGuides::Test->write_data(
    110124                                      guide      => $guide,
    111125                                      node       => "London Aquarium $i",
     
    120134                                                  latlong_dist => 1500,
    121135                                                  latitude     => 51.5,
    122136                                                  longitude    => -0.12,
     137                                                  next         => 21,
    123138                                                },
    124139                             );
    125140    like( $output, qr/search.cgi\?.*latitude=51.5.*Next.*results/s,
     
    128143          "longitude retained in next page link" );
    129144    like( $output, qr/search.cgi\?.*latlong_dist=1500.*Next.*results/s,
    130145          "latlong_dist retained in next page link" );
     146    like( $output, qr/search.cgi\?.*latitude=51.5.*Previous.*results/s,
     147          "latitude retained in previous page link" );
     148    like( $output, qr/search.cgi\?.*longitude=-0.12.*Previous.*results/s,
     149          "longitude retained in previous page link" );
     150    like( $output, qr/search.cgi\?.*latlong_dist=1500.*Previous.*results/s,
     151          "latlong_dist retained in previous page link" );
    131152}