Yesod 햄릿 getHomeR는

Question

getHomeR :: Handler Html 
getHomeR = do 
    wordList <- runDB $ selectList [] [] :: HandlerT App IO [Entity Vocabulary] 
    defaultLayout 
     [whamlet| 
      <ul> 
       $forall Entity wordid wordItem <- wordList 
        <li> 
         <a href=@{HomeR}>#{date wordItem} 
     |] 

내가

Variable not in scope: date :: Vocabulary -> a0 

가 나는 모델에서 정의하는 동안이 오류가 참조 찾을 수 없습니다 나는 yesod 발판을 기반으로 개발하고 있어요 예 : yesod-postgres

Answer 1

date 대신 vocabularyDate이어야합니다. yesod book에 영구 섹션에 따르면 ,

mkPersist sqlSettings [persistLowerCase| 
Person 
    name String 
    age Int 
    deriving Show 
|] 

의지는 당신이 볼 수 있듯이, 필드 이름은 데이터 이름을 붙

data Person = Person 
    { personName :: !String 
    , personAge :: !Int 
    } 
    deriving Show 
... 

과 같은 코드 (personName 대신 name)를 생성 . 이것은 하스켈에서 이름 충돌을 피하기위한 표준 사례이다.