使用 elm-native-ui 的基本聊天

Question

我正在使用 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 user a messages) returns节点消息

检查下面的错误

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 returns (String -> Node Msg)

chatView 是这样定义的，怎么会出现这个错误：

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

Answer 1

chatView 有四个参数，而您只传递了三个。

使用 elm-native-ui 的基本聊天

Basic Chat using elm-native-ui

elm