榆樹郎將列表中的元素到父容器

Question

我有以下類型的模型：

type alias NetworkList = 
    { networks : (List Network) } 

type alias Network = 
    { name: String } 

一旦我加載它們，我要顯示在取景功能的UL列表。我發現這種解決方案通過每個孩子在列表進行迭代：

networkPickContent: NetworkList -> Html Msg 
networkPickContent networks = 
    networks 
     |> List.map networkRow 
     |> ul [ class "my_class" ] 


networkRow: Network -> Html Msg 
networkRow network = 
    li [] [ text network.name ] 

卻無法真正使工作，調試器返回錯誤：

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

    networks 
     |> List.map networkRow 

(|>) is expecting the right side to be a: 

    NetworkList -> a 

But the right side is: 

    List Network -> List (Html Msg) 

我在做什麼錯在這案件？爲了這種目的使用List.map是否合理？還是有更好的方法來顯示所有的子元素？

Answer 1

NetworkList是以網絡作爲關鍵字的記錄。嘗試以下代替

networkPickContent: NetworkList -> Html Msg 
networkPickContent networkList = 
    networkList.networks 
     |> List.map networkRow 
     |> ul [ class "my_class" ]