= Just $ do setContentType $ read "text/html"
output ("<title>Multipart Form Test</title>" ++
"<form action=\"/\" method=\"post\" enctype=\"multipart/form-data\">" ++
= Just $ do setContentType $ read "text/html"
output ("<title>Multipart Form Test</title>" ++
"<form action=\"/\" method=\"post\" enctype=\"multipart/form-data\">" ++