diff options
author | Adam Chlipala <adamc@hcoop.net> | 2009-09-15 10:18:56 -0400 |
---|---|---|
committer | Adam Chlipala <adamc@hcoop.net> | 2009-09-15 10:18:56 -0400 |
commit | 62c16c0eed4b755ffcc4379455971a4c0125a3a8 (patch) | |
tree | b81fba316b6a552d9b1cf527831175d0926da43f /demo/more/dbgrid.ur | |
parent | 93594385adcba919b2e61785b5a60779e2be20db (diff) |
Summary row with aggregates
Diffstat (limited to 'demo/more/dbgrid.ur')
-rw-r--r-- | demo/more/dbgrid.ur | 3 |
1 files changed, 3 insertions, 0 deletions
diff --git a/demo/more/dbgrid.ur b/demo/more/dbgrid.ur index deefd4f1..04eb6dc5 100644 --- a/demo/more/dbgrid.ur +++ b/demo/more/dbgrid.ur @@ -251,6 +251,7 @@ functor Make(M : sig con aggregates :: {Type} val aggregates : $(map (aggregateMeta (key ++ row)) aggregates) + val aggFolder : folder aggregates end) = struct open Grid.Make(struct fun keyOf r = r --- M.row @@ -297,5 +298,7 @@ functor Make(M : sig val folder = M.colsFolder val aggregates = M.aggregates + + val aggFolder = M.aggFolder end) end |