Index: openacs-4/packages/xowiki/xowiki.info =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/xowiki/xowiki.info,v diff -u -N -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 @@ t xowiki - + Gustaf Neumann A xotcl-based enterprise wiki system with multiple object types 2017-08-06 @@ -55,7 +55,7 @@ BSD-Style 2 - + 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 -N -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 -N -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