projects
/
freeside.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
import rt 3.6.4
[freeside.git]
/
rt
/
html
/
Elements
/
QueryString
diff --git
a/rt/html/Elements/QueryString
b/rt/html/Elements/QueryString
index
1ddab85
..
0176180
100644
(file)
--- a/
rt/html/Elements/QueryString
+++ b/
rt/html/Elements/QueryString
@@
-2,7
+2,7
@@
%#
%# COPYRIGHT:
%#
%#
%# COPYRIGHT:
%#
-%# This software is Copyright (c) 1996-200
5
Best Practical Solutions, LLC
+%# This software is Copyright (c) 1996-200
7
Best Practical Solutions, LLC
%# <jesse@bestpractical.com>
%#
%# (Except where explicitly superseded by other copyright notices)
%# <jesse@bestpractical.com>
%#
%# (Except where explicitly superseded by other copyright notices)
@@
-22,7
+22,9
@@
%#
%# You should have received a copy of the GNU General Public License
%# along with this program; if not, write to the Free Software
%#
%# You should have received a copy of the GNU General Public License
%# along with this program; if not, write to the Free Software
-%# Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
+%# Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA
+%# 02110-1301 or visit their web page on the internet at
+%# http://www.gnu.org/copyleft/gpl.html.
%#
%#
%# CONTRIBUTION SUBMISSION POLICY:
%#
%#
%# CONTRIBUTION SUBMISSION POLICY:
@@
-49,7
+51,12
@@
while ( my ($key, $value) = each %ARGS ){
if( UNIVERSAL::isa( $value, 'ARRAY' ) ) {
push @params, map $key."=".$m->interp->apply_escapes($_,'u'), @$value;
} else {
if( UNIVERSAL::isa( $value, 'ARRAY' ) ) {
push @params, map $key."=".$m->interp->apply_escapes($_,'u'), @$value;
} else {
- push @params, $key."=".$m->interp->apply_escapes($value,'u');
+ if (ref $value eq "ARRAY") {
+ push @params, $key."=".$m->interp->apply_escapes($_, 'u')
+ for @{$value};
+ } else {
+ push @params, $key."=".$m->interp->apply_escapes($value||"",'u');
+ }
}
}
return(join('&',@params));
}
}
return(join('&',@params));