Index: openacs-4/packages/acs-object-management/tcl/form-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-object-management/tcl/form-procs.tcl,v
diff -u -r1.2 -r1.3
--- openacs-4/packages/acs-object-management/tcl/form-procs.tcl	11 Dec 2009 00:19:09 -0000	1.2
+++ openacs-4/packages/acs-object-management/tcl/form-procs.tcl	2 Jan 2010 14:04:00 -0000	1.3
@@ -62,11 +62,15 @@
 
     set html_params {}
     set params {}
+    
     db_foreach get_params {} {
         if { $html_p } {
             lappend html_params $param
             lappend html_params $value
         } else {
+            if {$param_source eq "eval"} {
+                set value [eval $value]
+            }    
             lappend params [list $param $value]
         }
     }