[Koha-patches] [PATCH] Remove string processing (redundant to new pagination_bar)
Joe Atzberger
joe.atzberger at liblime.com
Wed May 28 01:05:59 CEST 2008
---
tags/review.pl | 15 ++++++++-------
1 files changed, 8 insertions(+), 7 deletions(-)
diff --git a/tags/review.pl b/tags/review.pl
index 291e84a..010f133 100755
--- a/tags/review.pl
+++ b/tags/review.pl
@@ -209,13 +209,8 @@ if ($filter = $input->param('approved_by')) { # borrowernumber from link
$debug and print STDERR "filters: " . Dumper(\%filters);
my $tagloop = get_approval_rows(\%filters);
my $qstring = $input->query_string;
-$qstring =~ s/([&;])*\blimit=\d+//; # remove pagination vars
-# $qstring =~ s/([&;])*\bpage=\d+//; # remove pagination vars
-# $qstring =~ s/\&[\&]+/&/g; # compress duplicates
-# $qstring =~ s/;;+/;/g; # compress duplicates
-# $qstring =~ s/\&;//g; # remove empties
-# $qstring =~ s/;+$//; # remove trailing delim
-$qstring =~ s/^;+//; # remove leading delim
+$qstring =~ s/([&;])*\blimit=\d+//; # remove pagination var
+$qstring =~ s/^;+//; # remove leading delims
$qstring = "limit=$pagesize" . ($qstring ? '&' . $qstring : '');
$debug and print STDERR "number of approval_rows: " . scalar(@$tagloop) . "rows\n";
(scalar @errors) and $template->param(message_loop=>\@errors);
@@ -236,3 +231,9 @@ $template->param(
output_html_with_http_headers $input, $cookie, $template->output;
__END__
+=head1 AUTHOR
+
+Joe Atzberger
+atz AT liblime.com
+
+=cut
--
1.5.5.GIT
More information about the Koha-patches
mailing list