funny little arrows, wheee... :)

git-svn-id: http://svn.maypole.perl.org/Maypole/trunk@216 48953598-375a-da11-a14b-00016c27c3ee

diff --git a/templates/factory/list b/templates/factory/list
index 843f9a4d50b603bfced8da3c999ab0cc763eb22b..a8fd016b95d9fadb7be113804b21a24a83b52d25 100644 (file)
--- a/templates/factory/list
+++ b/templates/factory/list
@@ -20,6 +20,13 @@
                 IF col == request.query.order and request.query.o2 != "desc";
                 link(classmetadata.table, "list", additional,
                     classmetadata.colnames.$col);
+                IF col == request.query.order;
+                    IF request.query.o2 != "desc";
+                        "↓";
+                    ELSE;
+                        "↑";
+                    END;
+                END;
                 "</th>";
             END %]
            <th>Actions</th>