In short.  Solve this:

module Main exposing (..)

import Html


-- import Json.Decode exposing (Decoder, decodeString, keyValuePairs)


json : String
json =
    """[{a: 1, foo: "bar", bar: "baz"},
 {a: 2, foo: "baz", bar: "foo"},
 {a: 34, foo: "big", bar: "lebowski"}]"""


gen_keys : String -> String
gen_keys json =
    -- Decode the first JSON record and return a comma separated
    -- list of keys
    json


main : Html.Html string
main =
    Html.text (gen_keys json)

-- 
You received this message because you are subscribed to the Google Groups "Elm 
Discuss" group.
To unsubscribe from this group and stop receiving emails from it, send an email 
to elm-discuss+unsubscr...@googlegroups.com.
For more options, visit https://groups.google.com/d/optout.

Reply via email to