Fix to check that a has_a points to another Model object.

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

diff --git a/templates/factory/macros b/templates/factory/macros
index e7396d3365d3732d568d494d6e3d5a469cba7042..4a90e1771f4f1ae9e2c60cb20a2ee009dfaca165 100644 (file)
--- a/templates/factory/macros
+++ b/templates/factory/macros
@@ -34,7 +34,7 @@ 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
+    IF object.isa('Maypole::Model::Base');
         link(object.table, "view", object.id.join('/'), object);
     ELSE;
         object;