diff options
Diffstat (limited to 'http-server.mu')
| -rw-r--r-- | http-server.mu | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/http-server.mu b/http-server.mu index c5865fc4..c415b094 100644 --- a/http-server.mu +++ b/http-server.mu @@ -14,7 +14,7 @@ def main [ return-unless socket session:num <- $accept socket contents:&:source:char, sink:&:sink:char <- new-channel 30 - sink <- start-running transmit-from-socket session, sink + sink <- start-running receive-from-socket session, sink buf:&:buffer <- new-buffer 30 { c:char, done?:bool, contents <- read contents @@ -50,7 +50,7 @@ def write-to-socket session-socket:num, s:text [ } ] -def transmit-from-socket session:num, sink:&:sink:char -> sink:&:sink:char [ +def receive-from-socket session:num, sink:&:sink:char -> sink:&:sink:char [ local-scope load-ingredients { |