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.53 -r1.54 --- openacs-4/packages/xowiki/tcl/weblog-procs.tcl 18 Jun 2010 10:24:59 -0000 1.53 +++ openacs-4/packages/xowiki/tcl/weblog-procs.tcl 22 Jun 2010 07:35:48 -0000 1.54 @@ -36,18 +36,18 @@ set folder_id [::$package_id folder_id] set form_item_ids [list] foreach t [split $forms |] { - #my log "getting $t" + #my msg "trying to get $t" set page [$package_id get_page_from_item_ref \ -use_prototype_pages true \ -use_package_path true \ -parent_id $parent_id \ $t] - #my log "weblog form $t => $page" + #my msg "weblog form $t => $page" if {$page ne ""} { lappend form_item_ids [$page item_id] } } - #my msg "instantiate: parent_id=$parent_id-forms=$forms -> $form_item_ids" + #my log "instantiate: parent_id=$parent_id-forms=$forms -> $form_item_ids" return $form_item_ids }