summaryrefslogtreecommitdiff
path: root/demo/batchFun.ur
diff options
context:
space:
mode:
Diffstat (limited to 'demo/batchFun.ur')
-rw-r--r--demo/batchFun.ur2
1 files changed, 1 insertions, 1 deletions
diff --git a/demo/batchFun.ur b/demo/batchFun.ur
index ca48c7dc..2b54a426 100644
--- a/demo/batchFun.ur
+++ b/demo/batchFun.ur
@@ -85,7 +85,7 @@ functor Make(M : sig
<xml><dyn signal={ls <- signal lss; return <xml><table>
<tr>
<th>Id</th>
- {@mapX [colMeta] [_]
+ {@mapX [colMeta] [[Body, Tr]]
(fn [nm :: Name] [p ::_] [rest ::_] [[nm] ~ rest] m =>
<xml><th>{[m.Nam]}</th></xml>)
M.fl M.cols}