Index: openacs-4/packages/xowiki/xowiki.info
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/xowiki/xowiki.info,v
diff -u -r1.175 -r1.176
--- openacs-4/packages/xowiki/xowiki.info	6 Dec 2018 17:59:41 -0000	1.175
+++ openacs-4/packages/xowiki/xowiki.info	20 Jan 2019 20:41:14 -0000	1.176
@@ -10,7 +10,7 @@
     <inherit-templates-p>t</inherit-templates-p>
     <auto-mount>xowiki</auto-mount>
 
-    <version name="5.10.0d17" url="http://openacs.org/repository/download/apm/xowiki-5.10.0d17.apm">
+    <version name="5.10.0d18" url="http://openacs.org/repository/download/apm/xowiki-5.10.0d18.apm">
         <owner url="mailto:neumann@wu-wien.ac.at">Gustaf Neumann</owner>
         <summary>A xotcl-based enterprise wiki system with multiple object types</summary>
         <release-date>2017-08-06</release-date>
@@ -55,7 +55,7 @@
         <license>BSD-Style</license>
         <maturity>2</maturity>
 
-        <provides url="xowiki" version="5.10.0d17"/>
+        <provides url="xowiki" version="5.10.0d18"/>
         <requires url="xotcl-core" version="5.10.0d11"/>
 	<requires url="acs-datetime" version="5.9.1"/>
         <requires url="acs-kernel" version="5.9.1"/>
Index: openacs-4/packages/xowiki/tcl/form-field-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/xowiki/tcl/form-field-procs.tcl,v
diff -u -r1.283 -r1.284
--- openacs-4/packages/xowiki/tcl/form-field-procs.tcl	18 Jan 2019 12:30:15 -0000	1.283
+++ openacs-4/packages/xowiki/tcl/form-field-procs.tcl	20 Jan 2019 20:41:14 -0000	1.284
@@ -88,7 +88,7 @@
     foreach f [::xowiki::formfield::FormField info instances -closure] {
       if {[$f name] eq $name} {
         if {![$f exists object]} {
-          :msg "strange, $f [$f name] was created without object but fits name"
+          #ad_log warning "strange, $f [$f name] was created without object but fits name"
           return $f
         } elseif {$object eq [$f object]} {
           return $f
@@ -219,7 +219,7 @@
                          -package_id $package_id]
       }
     } else {
-      set success 0
+      set success [$object evaluate_form_field_condition $cond]
     }
     return $success
   }
Index: openacs-4/packages/xowiki/tcl/xowiki-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/xowiki/tcl/xowiki-procs.tcl,v
diff -u -r1.539 -r1.540
--- openacs-4/packages/xowiki/tcl/xowiki-procs.tcl	3 Nov 2018 18:59:55 -0000	1.539
+++ openacs-4/packages/xowiki/tcl/xowiki-procs.tcl	20 Jan 2019 20:41:14 -0000	1.540
@@ -1789,6 +1789,13 @@
     return 1
   }
 
+  Page instproc evaluate_form_field_condition {cond} {
+    #
+    # Can be refined
+    #
+    return 0
+  }
+
   Page instproc save args {
     if {![:can_save]} {error "can't save this page under this parent"}
     ${:package_id} flush_page_fragment_cache