2449 |
# fields, the url query-string will become very long. this is a |
# fields, the url query-string will become very long. this is a |
2450 |
# problem, since IE5 truncates query-strings at ~2048 characters. |
# problem, since IE5 truncates query-strings at ~2048 characters. |
2451 |
$url =~ s/(\w|-)+=;//g; |
$url =~ s/(\w|-)+=;//g; |
2452 |
print $q->p(qq{<a href="$url">View for bookmarking</a>\n}); |
|
2453 |
|
print "\n<p>", |
2454 |
|
qq{<a href="$url">View for bookmarking</a>}, |
2455 |
|
"<br />"; |
2456 |
|
if ($reversesort) { |
2457 |
|
$url =~ s/[&;]reversesort=[^&;]*//; |
2458 |
|
} else { |
2459 |
|
$url .= $q->escapeHTML(";reversesort=Descending Order"); |
2460 |
|
} |
2461 |
|
print qq{<a href="$url">Reverse sort order</a>}, |
2462 |
|
"</p>"; |
2463 |
|
|
2464 |
# Allow the user to store this query. Need to repeat params as hidden |
# Allow the user to store this query. Need to repeat params as hidden |
2465 |
# fields so they are available to the 'store query' handler. |
# fields so they are available to the 'store query' handler. |