Index: openacs-4/packages/xowiki/tcl/link-procs.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/xowiki/tcl/link-procs.tcl,v diff -u -r1.1 -r1.2 --- openacs-4/packages/xowiki/tcl/link-procs.tcl 15 Apr 2006 23:01:09 -0000 1.1 +++ openacs-4/packages/xowiki/tcl/link-procs.tcl 16 Apr 2006 19:32:04 -0000 1.2 @@ -18,7 +18,6 @@ if {[my isclass $class]} {my class $class} } Link instproc resolve {} { - my log "--LINK " ::Generic::CrItem lookup -title [my title] -parent_id [my folder_id] } Link instproc render_found {href label} { 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.26 -r1.27 --- openacs-4/packages/xowiki/tcl/xowiki-procs.tcl 15 Apr 2006 23:01:09 -0000 1.26 +++ openacs-4/packages/xowiki/tcl/xowiki-procs.tcl 16 Apr 2006 19:32:04 -0000 1.27 @@ -144,9 +144,9 @@ if {[apm_version_names_compare $from_version_name "0.21"] == -1 && [apm_version_names_compare $to_version_name "0.21"] > -1} { ns_log notice "-- upgrading to 0.21" - db_1row create_att { - select content_type__create_attribute( - '::xowiki::Page','page_title','text', + db_1row create_att { + select content_type__create_attribute( + '::xowiki::Page','page_title','text', 'Page Title',null,null,null,'text' )} db_1row create_att { select content_type__create_attribute( @@ -579,7 +579,7 @@ }] break } - if {$item_id ne ""} { + if {[info exists item_id]} { # we have a valid item_id and get the folder object #my log "--f fetch folder object -object ::$folder_id -item_id $item_id" set o [::xowiki::Object fetch_object -object ::$folder_id -item_id $item_id]