X-Git-Url: https://git.decadent.org.uk/gitweb/?a=blobdiff_plain;f=templates%2Ffactory%2Fmacros;h=4a90e1771f4f1ae9e2c60cb20a2ee009dfaca165;hb=ce6a9545f5fd2fde3490b7172193d31a8ceece2f;hp=3d45a6fa65c36bae4d5a48db84e17722b41b38d2;hpb=d77cc42a2fd0ae059128043822ef127199e55ed2;p=maypole.git diff --git a/templates/factory/macros b/templates/factory/macros index 3d45a6f..4a90e17 100644 --- a/templates/factory/macros +++ b/templates/factory/macros @@ -13,7 +13,9 @@ catenating the base URL, table, command, and any arguments. #%] [% MACRO link(table, command, additional, label) BLOCK; - ''; + SET lnk = base _ "/" _ table _ "/" _ command _ "/" _ additional; + lnk = lnk | uri | html; + ''; label; ""; END; @@ -32,8 +34,8 @@ command for that object. Otherwise, it just displays the data. [% MACRO maybe_link_view(object) BLOCK; - IF object.table; # It's an object, i.e. a has-a - link(object.table, "view", object.id, object); + IF object.isa('Maypole::Model::Base'); + link(object.table, "view", object.id.join('/'), object); ELSE; object; END; @@ -52,11 +54,11 @@ for some. #%] [% MACRO display_line(item) BLOCK; - FOR col = classmetadata.columns; + FOR col = classmetadata.list_columns; NEXT IF col == "id"; ""; - IF col == "url"; - " "; item.url; ""; + IF col == "url" AND item.url; + ' '; item.url; ''; ELSIF col == item.stringify_column; maybe_link_view(item); ELSE; @@ -64,8 +66,10 @@ for some. END; ""; END; + ''; button(item, "edit"); button(item, "delete"); + ""; END %] [%# @@ -77,12 +81,8 @@ This is a generic button, which performs an action on an object. #%] [% MACRO button(obj, action) BLOCK; %] - -
- -
- +
+
[% END %] [%# @@ -99,7 +99,7 @@ brewery) calls the accesor, and displays a list of the results. [% MACRO view_related(object) BLOCK; FOR accessor = classmetadata.related_accessors.list; - "

"; accessor | ucfirst; "

\n"; + "
"; accessor | ucfirst; "
\n"; "