diff options
| author | Christopher Burger <burgerc@freeside.biz> | 2018-02-26 12:00:45 -0500 |
|---|---|---|
| committer | Christopher Burger <burgerc@freeside.biz> | 2018-02-26 12:00:45 -0500 |
| commit | 8c36d1e4f1255abb483bc7372fa1908cc192b528 (patch) | |
| tree | 4860dc83c68920f2a8444c67ba01187501d2b3fc /httemplate/elements/handle_uri_query | |
| parent | 66feacf4ed45aa7b27d48f91c0d8741f0ad9b9de (diff) | |
| parent | def6bb5926b81d4a4b66e0c9dd7ff03bf55706ad (diff) | |
Merge branch 'master' of ssh://git.freeside.biz/home/git/freeside
Diffstat (limited to 'httemplate/elements/handle_uri_query')
| -rw-r--r-- | httemplate/elements/handle_uri_query | 12 |
1 files changed, 11 insertions, 1 deletions
diff --git a/httemplate/elements/handle_uri_query b/httemplate/elements/handle_uri_query index 2dea96a6d..b86ef0092 100644 --- a/httemplate/elements/handle_uri_query +++ b/httemplate/elements/handle_uri_query @@ -1,9 +1,17 @@ +<%doc> + +Usage (before accessing any $cgi parameters): + +$m->comp('/elements/handle_uri_query'); + +</%doc> <%init> -my %opt = @_; +#my %opt = @_; if ( $cgi->param('redirect') ) { my $session = $cgi->param('redirect'); + my $maxrecords = $cgi->param('maxrecords'); my $pref = $FS::CurrentUser::CurrentUser->option("redirect$session"); die "unknown redirect session $session\n" unless length($pref); @@ -16,5 +24,7 @@ if ( $cgi->param('redirect') ) { $cgi->param($param, $decrypted); } + $cgi->param('maxrecords', $maxrecords) if $maxrecords =~ /^(\d+)$/; + } </%init> |