Index: openacs-4/contrib/obsolete-packages/wf-ticket-tracker/sql/postgresql/wf-ticket-tracker-create.sql
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/contrib/obsolete-packages/wf-ticket-tracker/sql/postgresql/wf-ticket-tracker-create.sql,v
diff -u -r1.1 -r1.2
--- openacs-4/contrib/obsolete-packages/wf-ticket-tracker/sql/postgresql/wf-ticket-tracker-create.sql	4 May 2001 21:41:11 -0000	1.1
+++ openacs-4/contrib/obsolete-packages/wf-ticket-tracker/sql/postgresql/wf-ticket-tracker-create.sql	4 May 2001 21:53:57 -0000	1.2
@@ -45,9 +45,16 @@
 	new__creation_date	alias for $6;
 	new__creation_user	alias for $7;
 	new__creation_ip	alias for $8;
+	v_creation_date		timestamp;
         v_ticket_id number;
 	v_case_id number;
     begin
+	if (new__creation_date is null) or (new__creation_date = 0) then
+	    v_creation_date = now();
+	else
+	    v_creation_date = new__creation_date;
+	end if;
+	
         v_ticket_id := acs_object__new(
 	    new__ticket_id,		-- object_id => ticket_id,	
 	    ''wf_ticket'',		-- object_type => ''wf_ticket'',