r5473 - trunk/gnue-appserver/samples

[johannes]

Author: johannes
Date: 2004-03-23 06:46:23 -0600 (Tue, 23 Mar 2004)
New Revision: 5473

Modified:
   trunk/gnue-appserver/samples/classrepository.gfd
Log:
Try to fix the ON-NewRecord trigger.


Modified: trunk/gnue-appserver/samples/classrepository.gfd
===================================================================
--- trunk/gnue-appserver/samples/classrepository.gfd    2004-03-23 10:58:09 UTC 
(rev 5472)
+++ trunk/gnue-appserver/samples/classrepository.gfd    2004-03-23 12:46:23 UTC 
(rev 5473)
@@ -42,7 +42,8 @@
       <!-- if a new class is created, reset the fullClassName field to it's
            default value -->
       <trigger name="newClass" type="ON-NEWRECORD"><![CDATA[
-        blkUnbound.fullClassName.set ("not set")
+        if blkUnbound is not None:
+          blkUnbound.fullClassName.set ("not set")
         ]]>
       </trigger>
     </block>