diff options
author | Anton Luka Šijanec <anton@sijanec.eu> | 2022-08-08 01:09:48 +0200 |
---|---|---|
committer | Anton Luka Šijanec <anton@sijanec.eu> | 2022-08-08 01:09:48 +0200 |
commit | 0f935dbb098bf88848b8ac164f4ad4153054572e (patch) | |
tree | 0273b9c53e9c2c5b54f8ded88569966d55381a2f /www.tcl | |
parent | fix www.tcl (it's never right on the first try) (diff) | |
download | discord.tcl-0f935dbb098bf88848b8ac164f4ad4153054572e.tar discord.tcl-0f935dbb098bf88848b8ac164f4ad4153054572e.tar.gz discord.tcl-0f935dbb098bf88848b8ac164f4ad4153054572e.tar.bz2 discord.tcl-0f935dbb098bf88848b8ac164f4ad4153054572e.tar.lz discord.tcl-0f935dbb098bf88848b8ac164f4ad4153054572e.tar.xz discord.tcl-0f935dbb098bf88848b8ac164f4ad4153054572e.tar.zst discord.tcl-0f935dbb098bf88848b8ac164f4ad4153054572e.zip |
Diffstat (limited to 'www.tcl')
-rwxr-xr-x | www.tcl | 4 |
1 files changed, 2 insertions, 2 deletions
@@ -103,7 +103,7 @@ namespace eval www { my destroy } if {[string length $to_parse] == [dict get $headers content-length]} { - lappend arguments {*}[split $to_parse "%=;"] + lappend arguments {*}[split $to_parse "&=;"] set body $to_parse set stage read my request_complete @@ -117,7 +117,7 @@ namespace eval www { method request_complete {} { my variable actions headers arguments uri body path dict for {key value} $actions { - if [string match -nocase $key $uri] { + if [string match -nocase $key $path] { return [{*}$value [self] $path $arguments $headers $body $uri] } } |