Index: openacs-4/packages/xowiki/tcl/xowiki-form-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/xowiki/tcl/xowiki-form-procs.tcl,v
diff -u -r1.138 -r1.139
--- openacs-4/packages/xowiki/tcl/xowiki-form-procs.tcl	21 Oct 2017 17:35:58 -0000	1.138
+++ openacs-4/packages/xowiki/tcl/xowiki-form-procs.tcl	9 Nov 2017 10:34:50 -0000	1.139
@@ -586,12 +586,12 @@
 
   PodcastForm instproc new_data {} {
     set pub_date [:var pub_date]
-    :var pub_date [list [:to_timestamp $pub_date]]
+    ${:data} set pub_date [list [:to_timestamp $pub_date]]
     return [next]
   }
   PodcastForm instproc edit_data {} {
     set pub_date [:var pub_date]
-    :var pub_date [list [:to_timestamp $pub_date]]
+    ${:data} set pub_date [list [:to_timestamp $pub_date]]
     return [next]
   }