Index: trunk/glueforge/templates/psdb/alloc.tt
===================================================================
--- trunk/glueforge/templates/psdb/alloc.tt	(revision 4172)
+++ trunk/glueforge/templates/psdb/alloc.tt	(revision 4196)
@@ -4,15 +4,13 @@
 
 [% object_name %] *[% object_name %]Alloc(
-    [%- SET i = 0 -%]
-    [%- FOREACH item = columns -%]
-        [%- IF i == 0 -%]
-            [%- i = 1 -%]
-
-        [%- ELSE -%]
-, 
-        [%- END -%]
-        [%- item.ctype %] [% item.name %]
-        [%- i = i + 1 -%]
-    [%- END -%]
+[%- SET i = 0 -%]
+[% FOREACH item = columns -%]
+[% IF i == 0 %][% i = 1 %][% ELSE %], [% END -%]
+[% IF item.type == "STR" -%]
+const char *[% item.name %]
+[%- ELSE -%]
+[% item.ctype %] [% item.name %]
+[%- END -%]
+[% END -%]
 )
 {
@@ -23,5 +21,9 @@
 
 [% FOREACH item = columns -%]
+[% IF item.type == "STR" -%]
+    object->[% item.name %] = psStringCopy([% item.name %]);
+[% ELSE -%]
     object->[% item.name %] = [% item.name %];
+[% END -%]
 [% END -%]
 
