From: Sebastian Riedel <sri@labs.kraih.com>
Date: Thu, 21 Oct 2004 18:49:14 +0000 (+0000)
Subject: fixed ordering
X-Git-Tag: 2.10~108
X-Git-Url: https://git.decadent.org.uk/gitweb/?a=commitdiff_plain;h=2a8769a07ba2f1165b5432aa93c11275c4c22b15;p=maypole.git

fixed ordering


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

diff --git a/templates/factory/list b/templates/factory/list
index ac3635f..5e8a760 100644
--- a/templates/factory/list
+++ b/templates/factory/list
@@ -13,6 +13,7 @@
             [% FOR col = classmetadata.list_columns.list;
                 NEXT IF col == "id";
                 "<th>"; 
+                SET title = classmetadata.colnames.$col;
                 SET additional = "?order=" _ col;
                 SET additional = additional _ "&amp;page=" _ pager.current_page
                     IF pager;
@@ -26,8 +27,7 @@
                     SET action = "search";
                   END;
                 END;
-                link(classmetadata.table, action, additional,
-                    classmetadata.colnames.$col);
+                link(classmetadata.table, action, additional, title);
                 IF col == request.query.order;
                     IF request.query.o2 != "desc";
                         "&darr;";