diff --git a/bot.rkt b/bot.rkt index 49473eb..6119997 100644 --- a/bot.rkt +++ b/bot.rkt @@ -15,12 +15,12 @@ (define boundary-line (string-append "--" boundary CRLF)) ; a table to map file extensions to MIME types: (define ext=>mime-type - #hash(("jpg" . #"image/jpeg") - ("png" . #"image/png") - ("gif" . #"image/Gif") - ("swf" . #"application/x-shockwave-flash") - ("mp4" . #"video/mp4") - ("webm" . #"video/webm"))) + #hash(("jpg" . "image/jpeg") + ("png" . "image/png") + ("gif" . "image/Gif") + ("swf" . "application/x-shockwave-flash") + ("mp4" . "video/mp4") + ("webm" . "video/webm"))) @@ -78,3 +78,5 @@ (loop)) (loop) + +