使用elm-native-ui进行基本聊天

时间:2017-06-10 22:26:47

标签: elm

我正在使用elm-native-ui创建基本的本机聊天应用。

我可以通过点击更改chatOpen布尔值

的按钮来打开或关闭聊天
activeChannelView =
    case chatOpen of
        True ->
            Maybe.map (\a -> chatView users a messages) activeChannel ? viewEmpty

        False ->
            Maybe.map (cardView users) activeChannel ? viewEmpty

在False方面,它运行良好但在True方面它表示viewEmpty需要是(String - > Node Msg)而不是(Node Msg)但是左侧(chatView用户是消息)返回节点消息

检查以下错误

The right side of (?) is causing a type mismatch.

Maybe.map (\a -> chatView users a messages)  activeChannel ? viewEmpty

^^^^^^^^^
(?) is expecting the right side to be a:

String -> Node Msg

But the right side is:

    Node Msg

我想这意味着: 如果activeChannel是(Just a),则True返回(String - > Node Msg)

由于chatView的定义如下,因此有可能出现此错误:

chatView : List User -> Request -> List String -> String -> Node Msg

1 个答案:

答案 0 :(得分:1)

chatView需要四个参数,而你只传递三个参数。