Index: openacs-4/packages/xowiki/tcl/package-procs.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/xowiki/tcl/package-procs.tcl,v diff -u -r1.36 -r1.37 --- openacs-4/packages/xowiki/tcl/package-procs.tcl 17 Feb 2007 23:01:36 -0000 1.36 +++ openacs-4/packages/xowiki/tcl/package-procs.tcl 18 Feb 2007 02:58:12 -0000 1.37 @@ -714,7 +714,7 @@ and s.object_id = p.page_id $timerange_clause \ order by p.last_modified desc $limit_clause \ " { - my log "--found $name" + #my log "--found $name" if {[string match "::*" $name]} continue if {$content_type eq "::xowiki::PageTemplate::"} continue @@ -730,8 +730,8 @@ } append content \n - set t text/plain - #set t text/xml + #set t text/plain + set t text/xml ns_return 200 $t $content } @@ -760,17 +760,17 @@ regexp {^([^.]+)[.][0-9]+(.*)$} $last_modified _ time tz set time "[clock format [clock scan $time] -format {%Y-%m-%dT%T}]${tz}:00" - my log "--site_node::get_from_object_id -object_id $package_id" + #my log "--site_node::get_from_object_id -object_id $package_id" array set info [site_node::get_from_object_id -object_id $package_id] append content \n\ [ad_url]$info(url)?google-sitemap \n\ $time \n\ } - append content \n - set t text/plain - #set t text/xml + append content \n + #set t text/plain + set t text/xml ns_return 200 $t $content }