Types 在Elm中使用NoMap和init上的http请求映射Msg

我正在构建我的第一个Elm应用程序，并根据以下来源构建它：

这意味着我将Msg类型从main types.elm映射到子函数。在执行简单的onClick函数时是这样的

---

单击MsgForPieChart使用Http.send-msgformuses尝试Http.send-msgformuses，这似乎可以解决这个问题，这让我想到另一个问题：我无法从子函数init调用Cmd-Msg？然后将其放在我的主init中

getWarAndPeace : Cmd Msg
getWarAndPeace =
    Http.send (MsgForMuseums <| FetchedMuseums) <|
        Http.getString "https://example.com/books/war-and-peace.md"

type Msg
= MsgForPieChart Atom.PieChart.Types.Msg
| MsgForMuseums Organism.Museums.Types.Msg 
| NoOp

type Msg = 
FetchedMuseums (Result Http.Error String)

Result Http.Error a -> App.Types.Msg

App.Types.Msg

update : App.Types.Msg -> Organism.Museums.Types.MuseumsModel -> Organism.Museums.Types.MuseumsModel
update msgFor model =
case msgFor of
    MsgForMuseums msg ->
        updateMuseums msg model
    _ ->
        model


updateMuseums : Organism.Museums.Types.Msg -> Organism.Museums.Types.MuseumsModel -> Organism.Museums.Types.MuseumsModel
updateMuseums msg model =
    case msg of
        FetchedMuseums data -> model