summaryrefslogtreecommitdiff
path: root/demo/more/grid.ur
diff options
context:
space:
mode:
authorGravatar Adam Chlipala <adamc@hcoop.net>2009-09-17 14:57:38 -0400
committerGravatar Adam Chlipala <adamc@hcoop.net>2009-09-17 14:57:38 -0400
commit7c045f4dd298b8cc1cbe5895b4fc30280e23abbf (patch)
tree804b6adcec86f73fe03fec74e729de1cb22a15cc /demo/more/grid.ur
parenta8f7c10142c355dbf032c0f3ba7a1e96d53b9039 (diff)
Bad sort functions tested
Diffstat (limited to 'demo/more/grid.ur')
-rw-r--r--demo/more/grid.ur2
1 files changed, 1 insertions, 1 deletions
diff --git a/demo/more/grid.ur b/demo/more/grid.ur
index a59e1082..2b451456 100644
--- a/demo/more/grid.ur
+++ b/demo/more/grid.ur
@@ -213,7 +213,7 @@ functor Make(M : sig
return (previous && this))
(fn _ => return True)
[_] M.folder M.cols grid.Cols grid.Filters row,
- Sort = return None}
+ Sort = return (Some (fn _ _ => return False))}
grid.Rows}
<dyn signal={rows <- Dlist.foldl (fn row => Monad.mapR2 [aggregateMeta M.row] [id] [id]