[Bps-public-commit] r14363 - in Prophet/trunk: .

[sartak at bestpractical.com]

Author: sartak
Date: Tue Jul 22 02:59:40 2008
New Revision: 14363

Modified:
   Prophet/trunk/   (props changed)
   Prophet/trunk/lib/Prophet/Server/View.pm

Log:
 r64715 at onn:  sartak | 2008-07-22 02:59:32 -0400
 Add a header to the table


Modified: Prophet/trunk/lib/Prophet/Server/View.pm
==============================================================================
--- Prophet/trunk/lib/Prophet/Server/View.pm	(original)
+++ Prophet/trunk/lib/Prophet/Server/View.pm	Tue Jul 22 02:59:40 2008
@@ -21,6 +21,15 @@
         body {
             table {
                 my @items = $records ? $records->items : ();
+                if (@items) {
+                    my @headers = $items[0]->_parse_format_summary;
+                    row {
+                        for (@headers) {
+                            th { $_->{prop} }
+                        }
+                    }
+                }
+
                 for my $record (sort { $a->luid <=> $b->luid } @items) {
                     my $type = $record->type;
                     my $uuid = $record->uuid;