summaryrefslogtreecommitdiffstats
path: root/www.tcl
diff options
context:
space:
mode:
authorAnton Luka Šijanec <anton@sijanec.eu>2022-08-08 01:09:48 +0200
committerAnton Luka Šijanec <anton@sijanec.eu>2022-08-08 01:09:48 +0200
commit0f935dbb098bf88848b8ac164f4ad4153054572e (patch)
tree0273b9c53e9c2c5b54f8ded88569966d55381a2f /www.tcl
parentfix www.tcl (it's never right on the first try) (diff)
downloaddiscord.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-xwww.tcl4
1 files changed, 2 insertions, 2 deletions
diff --git a/www.tcl b/www.tcl
index e5cd36f..0e20f7a 100755
--- a/www.tcl
+++ b/www.tcl
@@ -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]
}
}