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.23 -r1.24
--- openacs-4/packages/xowiki/tcl/package-procs.tcl	1 Dec 2006 08:37:16 -0000	1.23
+++ openacs-4/packages/xowiki/tcl/package-procs.tcl	8 Dec 2006 16:01:51 -0000	1.24
@@ -544,6 +544,8 @@
     Class Package -array set require_permission {
       reindex            {{id admin}}
       rss                none
+      google-sitemap      none
+      google-sitemapindex none
       delete             swa
       edit-new           {{{has_class ::xowiki::Object} id admin} {id create}}
     }
@@ -576,6 +578,8 @@
     Class Package -array set require_permission {
       reindex            {{id admin}}
       rss                none
+      google-sitemap      none
+      google-sitemapindex none
       delete             swa
       edit-new           {{{has_class ::xowiki::Object} id admin} {id create}}
     }
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.58 -r1.59
--- openacs-4/packages/xowiki/tcl/xowiki-procs.tcl	2 Dec 2006 14:09:35 -0000	1.58
+++ openacs-4/packages/xowiki/tcl/xowiki-procs.tcl	8 Dec 2006 16:01:51 -0000	1.59
@@ -612,7 +612,8 @@
       if {$page ne ""} {
         $page destroy_on_cleanup
         $page set __including_page [self]
-        $page set __caller_parameters [lrange $arg 1 end]
+        regsub -all {([^\\])"}  [lrange $arg 1 end] {\1\"} parameters
+        $page set __caller_parameters $parameters
         #$page set __decoration portlet
         foreach {att value} [$page set __caller_parameters] {
           switch -- $att {