如何在Yesod中执行rawSql

Question

我是Yesod的新手，在脚手架站点上执行简单的rawSql语句有困难。

module Handler.RawSQL where

import Import

getRawSQLR :: Handler Html
getRawSQLR = do
    users <- runDB $ rawSql "SELECT ident, password FROM user" []
    defaultLayout $(widgetFile "rawsql")

我得到了错误:处理程序/RawSQL.hs:7:22:不在范围内：‘rawSql’

我做错了什么，如何在哈姆雷特模板中显示“用户”？

Answer 1

您可能只需要导入rawSql函数：

import Database.Persist.Sql (rawSql)