fluencelabs/dashboard
1
0
Fork 0
mirror of https://github.com/fluencelabs/dashboard synced 2025-04-29 01:32:13 +00:00
Code Issues Projects Releases Wiki Activity

combine all modules

Browse Source
This commit is contained in:
DieMyst 2020-11-26 22:26:39 +03:00
parent a3bce9f135
commit 39cb18306e
1 changed files with 10 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

10
src/Update.elm
View File

@ -23,6 +23,7 @@ import Browser.Navigation as Nav
import Dict import Dict
import Json.Decode exposing (decodeValue, list, string) import Json.Decode exposing (decodeValue, list, string)
import Json.Encode exposing (Value) import Json.Encode exposing (Value)
import List.Unique exposing (filterDuplicates)
import Maybe exposing (withDefault) import Maybe exposing (withDefault)
import Model exposing (Model, emptyPeerData) import Model exposing (Model, emptyPeerData)
import Modules.Air import Modules.Air
@ -173,3 +174,12 @@ updateModel model peer identify services modules blueprints =
in in
{ model | discoveredPeers = updated } { model | discoveredPeers = updated }
getAllModules : Model -> List String
getAllModules model =
let
peerDatas = Dict.values model.discoveredPeers
allModules = peerDatas |> List.map (\pd -> pd.modules)
flatten = List.foldr (++) [] (allModules)
modulesUnique = filterDuplicates (flatten)
in
modulesUnique