summaryrefslogtreecommitdiff
path: root/src/GF
diff options
context:
space:
mode:
Diffstat (limited to 'src/GF')
-rw-r--r--src/GF/Canon/CanonToJS.hs2
1 files changed, 1 insertions, 1 deletions
diff --git a/src/GF/Canon/CanonToJS.hs b/src/GF/Canon/CanonToJS.hs
index 47d900c9d..78f641139 100644
--- a/src/GF/Canon/CanonToJS.hs
+++ b/src/GF/Canon/CanonToJS.hs
@@ -50,7 +50,7 @@ concrete2js (C.CId a) (C.CId c, cnc) =
++ concatMap (cncdef2js l) ds
where
l = JS.Ident c
- ds = Map.assocs $ D.lins cnc
+ ds = concatMap Map.assocs [D.lins cnc, D.opers cnc, D.lindefs cnc]
cncdef2js :: JS.Ident -> (C.CId,C.Term) -> [JS.Element]
cncdef2js l (C.CId f, t) =