1
"onclick"설정을 사용하여 Yesod에서 Haskell 함수를 호출 할 수 있습니까?onclick을 사용하여 Yesod에서 Haskell 함수 호출
내가 전화하고 싶은 기능 :
save_all :: WidgetT App IO[()] save_all = mapM save_cur_answers (exam_questions exam_1)
save_cur_answers :: Question -> WidgetT App IO()
save_cur_answers quest = do
q_box1 <- runInputPost $ ireq checkBoxField (answer_id ((answer_list quest) !! 0))
q_box2 <- runInputPost $ ireq checkBoxField (answer_id ((answer_list quest) !! 1))
q_box3 <- runInputPost $ ireq checkBoxField (answer_id ((answer_list quest) !! 2))
q_box4 <- runInputPost $ ireq checkBoxField (answer_id ((answer_list quest) !! 3))
setSession (question_id quest) $ bool_to_cookie [q_box1, q_box2, q_box3, q_box4]
<input type="radio" onclick="save_all" name="tabs" id="tab#{question_id quest}">
에서 나는 모든 확인란의 결과를 얻을 내가 클릭 쿠키 매번에 저장하려면 라디오 버튼.
save_cur_answers
은 고유 한 answer_id로 체크 박스를 검색하고
Bool
값을 반환하고 그 중 4 개를 모두 저장합니다.