10 lines
195 B
Plaintext
10 lines
195 B
Plaintext
|
let Prelude = ../Prelude.dhall
|
||
|
|
|
||
|
|
let kv = Prelude.JSON.keyText
|
||
|
|
|
||
|
|
let selector
|
||
|
|
: Text → List { mapKey : Text, mapValue : Text }
|
||
|
|
= λ(appName : Text) → [ kv "app" appName ]
|
||
|
|
|
||
|
|
in selector
|