[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
Reverse sort order patch
From: |
Lars Henriksen |
Subject: |
Reverse sort order patch |
Date: |
Mon, 30 Sep 2002 21:15:36 +0200 |
User-agent: |
Mutt/1.4i |
Some recent patches have added the possibility of selecting sort method
and (descending) order before making a query.
This patch is a supplement that makes it possible to reverse the sort
method from the query result page by adding a "Reverse sort order" link
after the "View for bookmarking" link.
Lars Henriksen
Index: gnatsweb.pl
===================================================================
RCS file: /cvsroot/gnatsweb/gnatsweb/gnatsweb.pl,v
retrieving revision 1.101
diff -c -r1.101 gnatsweb.pl
*** gnatsweb.pl 24 Sep 2002 20:39:17 -0000 1.101
--- gnatsweb.pl 29 Sep 2002 19:38:20 -0000
***************
*** 2554,2560 ****
# fields, the url query-string will become very long. this is a
# problem, since IE5 truncates query-strings at ~2048 characters.
$url =~ s/\w+=;//g;
! print $q->p(qq{<a href="$url">View for bookmarking</a>\n});
# Allow the user to store this query. Need to repeat params as hidden
# fields so they are available to the 'store query' handler.
--- 2554,2572 ----
# fields, the url query-string will become very long. this is a
# problem, since IE5 truncates query-strings at ~2048 characters.
$url =~ s/\w+=;//g;
! print "<table cellspacing=0 cellpadding=3 border=0>",
! "<tr valign=top><td>",
! qq{<a href="$url">View for bookmarking</a>};
!
! # ... or reverse the sort method.
! if ($reversesort) {
! $url =~ s/;reversesort=[^;]*//;
! } else {
! $url .= $q->escapeHTML(";reversesort=Descending Order");
! }
! print "<td></td><td>",
! qq{<a href="$url">Reverse sort order</a>},
! "</tr></table>";
# Allow the user to store this query. Need to repeat params as hidden
# fields so they are available to the 'store query' handler.
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- Reverse sort order patch,
Lars Henriksen <=