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.123 -r1.124
--- openacs-4/packages/xowiki/tcl/package-procs.tcl	11 Jul 2008 12:21:36 -0000	1.123
+++ openacs-4/packages/xowiki/tcl/package-procs.tcl	11 Jul 2008 19:34:30 -0000	1.124
@@ -751,6 +751,10 @@
 <sitemapindex xmlns="http://www.google.com/schemas/sitemap/0.84">
 }
     foreach package_id  [::xowiki::Package instances] {
+      if {![::xo::parameter get -package_id $package_id \
+	       -parameter include_in_google_sitemap_index -default 1]} {
+	continue
+      } 
       set last_modified [db_string [my qn get_newest_modification_date] \
                              "select last_modified from acs_objects where package_id = $package_id \
 		order by last_modified desc limit 1"]