Index: openacs-4/packages/xowiki/tcl/weblog-procs.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/xowiki/tcl/weblog-procs.tcl,v diff -u -r1.34 -r1.35 --- openacs-4/packages/xowiki/tcl/weblog-procs.tcl 29 Jan 2008 12:06:26 -0000 1.34 +++ openacs-4/packages/xowiki/tcl/weblog-procs.tcl 19 May 2008 17:42:17 -0000 1.35 @@ -258,15 +258,6 @@ return $content } - proc ::xo::update_query_variable {old_query var value} { - set query [list [list $var $value]] - foreach pair [split $old_query &] { - foreach {key value} [split $pair =] break - if {$key eq $var} continue - lappend query [list [ns_urldecode $key] [ns_urldecode $value]] - } - return $query - } # default layout for weblog entries Class create ::xowiki::Weblog::EntryRenderer -instproc render {} { 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.244 -r1.245 --- openacs-4/packages/xowiki/tcl/xowiki-procs.tcl 9 May 2008 21:15:39 -0000 1.244 +++ openacs-4/packages/xowiki/tcl/xowiki-procs.tcl 19 May 2008 17:42:17 -0000 1.245 @@ -1750,7 +1750,7 @@ my log nr_items=[$items children] if {$h_where ne "" && ![::xo::db::has_hstore]} { - set init_vars $hw(vars) + set init_vars $wc(vars) foreach p [$items children] { array set __ia $init_vars array set __ia [$p instance_attributes]