From abd21e88bc4d622a7c43c6d04db28be75a4e7c5b Mon Sep 17 00:00:00 2001
From: Marcus Ramberg <mramberg@cpan.org>
Date: Wed, 8 Dec 2004 11:01:19 +0000
Subject: [PATCH] applied patch for public buttons.

git-svn-id: http://svn.maypole.perl.org/Maypole/trunk@304 48953598-375a-da11-a14b-00016c27c3ee
---
 Changes                  | 4 ++++
 templates/factory/macros | 2 ++
 2 files changed, 6 insertions(+)

diff --git a/Changes b/Changes
index 75c2a52..4c52c6b 100644
--- a/Changes
+++ b/Changes
@@ -11,6 +11,10 @@ Revision history for Perl extension Maypole
     - support compound primary keys in CDBI fetch_objects.
     - add support for compound primary keys in factory templates
       (Dagfinn Ilmari Mannsåker)
+    - Check if has_a actually points to a Maypole::Model (Dave Howorth)
+    - Only show buttons for public actions.
+      (Dagfinn Ilmari Mannsåker)
+
 
 2.04  Tue Oct 27 14:00:00 2004
     - fixed Apache::MVC version (Randal Schwartz)
diff --git a/templates/factory/macros b/templates/factory/macros
index 4a90e17..95dc973 100644
--- a/templates/factory/macros
+++ b/templates/factory/macros
@@ -81,9 +81,11 @@ This is a generic button, which performs an action on an object.
 
 #%]
 [% MACRO button(obj, action) BLOCK; %]
+[% IF obj.is_public(action) %]
 <form class="actionform" action="[% base %]/[% obj.table %]/[% action %]/[% obj.id.join('/') %]" method="post">
 <div class="field"><input class="actionbutton" type="submit" value="[% action %]" /></div></form>
 [% END %]
+[% END %]
 [%#
 
 =head2 view_related
-- 
2.39.5