Index: openacs-4/packages/xowiki/tcl/xowiki-www-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/xowiki/tcl/xowiki-www-procs.tcl,v
diff -u -r1.124 -r1.125
--- openacs-4/packages/xowiki/tcl/xowiki-www-procs.tcl	18 Dec 2007 14:48:36 -0000	1.124
+++ openacs-4/packages/xowiki/tcl/xowiki-www-procs.tcl	17 Jan 2008 13:00:14 -0000	1.125
@@ -221,7 +221,7 @@
         #
         array set property_body [::xo::Page get_property body]
         array set property_doc  [::xo::Page get_property doc]
-
+        # ns_log notice "XOWIKI body=[::xo::Page get_property body]"
         $package_id return_page -adp $template_file -variables {
           name title item_id context header_stuff return_url
           content footer package_id
@@ -695,7 +695,6 @@
     return $field_names
   }
 
-
   Page instproc save_attributes {} {
     my instvar package_id
     set field_names [my field_names]
@@ -730,7 +729,7 @@
           [my query_parameter "return_url" [$package_id pretty_link [my name]]]
       return
     } else {
-      # todo: handle errors
+      # todo: handle errors in a user friendly way
       my log "we have $validation_errors validation_errors"
     }
     $package_id returnredirect \
@@ -932,7 +931,7 @@
       set f [::xowiki::FormField::submit_button new -destroy_on_cleanup \
                  -name __form_button_ok \
                  -CSSclass $submit_button_class]
-      $f render_content
+      $f render_input
     }
     set form [lindex [$root selectNodes //form] 0]
     if {$form eq ""} {