app = do
    code <- (return . maybe "" id . fmap convertString) =<< getQueryParam "code"
    let tracedCode = traceJS code
    jsResponse tracedCode
app = do
    code <- (return . maybe "" id . fmap convertString) =<< getQueryParam "code"
    let tracedCode = traceJS code
    jsResponse tracedCode
app = do
    code <- (return . maybe "" id . fmap convertString) =<< getQueryParam "code"
    let tracedCode = traceJS code
    jsResponse tracedCode