~ubuntu-branches/ubuntu/edgy/libapache2-mod-perl2/edgy

« back to all changes in this revision

Viewing changes to t/compat/request_body.t

  • Committer: Bazaar Package Importer
  • Author(s): Adam Conrad
  • Date: 2006-03-24 02:48:44 UTC
  • mfrom: (1.1.3 upstream)
  • Revision ID: james.westby@ubuntu.com-20060324024844-73oxqkcj2jmlmh2t
Tags: 2.0.2-2build1
Fake sync to bring in new upstream bugfixes, UVF exception by mdz.

Show diffs side-by-side

added added

removed removed

Lines of Context:
73
73
 
74
74
### helper subs ###
75
75
sub query {
76
 
    my(%args) = (@_ % 2) ? %{+shift} : @_;
 
76
    my (%args) = (@_ % 2) ? %{+shift} : @_;
77
77
    "$location?" . join '&', map { "$_=$args{$_}" } keys %args;
78
78
}
79
79