summaryrefslogtreecommitdiff
path: root/src/GF/Canon/CMacros.hs
diff options
context:
space:
mode:
Diffstat (limited to 'src/GF/Canon/CMacros.hs')
-rw-r--r--src/GF/Canon/CMacros.hs2
1 files changed, 1 insertions, 1 deletions
diff --git a/src/GF/Canon/CMacros.hs b/src/GF/Canon/CMacros.hs
index d32f639b4..a5a079b4e 100644
--- a/src/GF/Canon/CMacros.hs
+++ b/src/GF/Canon/CMacros.hs
@@ -41,7 +41,7 @@ markXML n i b =
else ("<subtree" +++ p +++ c ++ ">", "</subtree>")
where
c = "type=" ++ prt (M.valNode n)
- p = "position=" ++ show i
+ p = "position=" ++ (show $ reverse i)
-- for XML in JGF 1, use
markXMLjgf :: Marker