diff options
| author |  Adam Chlipala <adam@chlipala.net> | 2010-12-15 09:42:35 -0500 |
|---|---|---|
| committer | Adam Chlipala <adam@chlipala.net> | 2010-12-15 09:42:35 -0500 |
| commit | edea99a45b84ac6ecf30f8de295d82926462e044 (patch) | |
| tree | 887dc1f5dd47e154d5c276803367b904c55fd2ef /demo/more | |
| parent | e98bdae0deba734c2bd2f8ee04922098386ce5d1 (diff) | |
Small tweaks to update demos for record unification change
Diffstat (limited to 'demo/more')
| -rw-r--r-- | demo/more/grid.ur | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/demo/more/grid.ur b/demo/more/grid.ur index e0b4a351..9375e811 100644 --- a/demo/more/grid.ur +++ b/demo/more/grid.ur @@ -125,7 +125,7 @@ functor Make(M : sig <table class={tabl}> <tr class={tr}> <th/> <th/> <th><button value="No sort" onclick={set grid.Sort None}/></th> - {@mapX2 [fst3] [colMeta M.row] [_] + {@mapX2 [fst3] [colMeta M.row] [[Body, Tr]] (fn [nm :: Name] [p :: (Type * Type * Type)] [rest :: {(Type * Type * Type)}] [[nm] ~ rest] data (meta : colMeta M.row p) => <xml><th class={th}> |