162,164d161
<       foreach argument [split $queryString {&}] {
<           lappend paramList $argument
<       }
167a165
>       set queryString $postQuery
169a168,170
>     foreach argument [split $queryString {&}] {
>         lappend paramList $argument
>     }
237a239
>       set queryString $postQuery
249c251
<       set headerURL ${url}?${queryString}
---
>       set header [header $url $queryString]
251c253
<       set headerURL $url
---
>       set header [header $url]
253,254d254
<
<     set header [header $headerURL]