Index: openacs-4/packages/xowiki/tcl/includelet-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/xowiki/tcl/includelet-procs.tcl,v
diff -u -r1.5 -r1.6
--- openacs-4/packages/xowiki/tcl/includelet-procs.tcl 30 Nov 2007 12:32:21 -0000 1.5
+++ openacs-4/packages/xowiki/tcl/includelet-procs.tcl 7 Dec 2007 14:25:04 -0000 1.6
@@ -381,6 +381,7 @@
rss-button instproc render {} {
my get_parameters
set href [export_vars -base [$package_id package_url] {{rss $span} name_filter title entries_of}]
+ regsub -all & $href "&" href
::xo::Page requireLink -rel alternate -type application/rss+xml -title RSS -href $href
return ""
}
@@ -412,6 +413,7 @@
'scrollbars=yes,width=700,height=575,status=yes,resizable=yes,scrollbars=yes'))
}]
regsub -all {[\n ]+} $href " " href
+ regsub -all & $href "&" href
return ""
}
@@ -1080,7 +1082,7 @@
-
+
}]
return $content
}
@@ -1179,7 +1181,8 @@
{title "[string range [$__including_page title] 0 74]"}
{body_text "[string range $description 0 349]"}
}]
- return ""
+ regsub -all & $digg_link "&" digg_link
+ return ""
}
::xowiki::IncludeletClass create delicious \
@@ -1210,7 +1213,8 @@
{notes "[string range $description 0 199]"}
tags
}]
- return "del.icio.us"
+ regsub -all & $delicious_link "&" delicious_link
+ return "del.icio.us"
}
@@ -1233,7 +1237,7 @@
set rssurl [ad_urlencode $rssurl]
set my_yahoo_link "http://us.rd.yahoo.com/my/atm/$publisher/$feedname/*http://add.my.yahoo.com/rss?url=$rssurl"
- return ""
+ return ""
}
::xowiki::IncludeletClass create my-references \
@@ -1931,7 +1935,7 @@
}
if {$link ne ""} {
- set html ""
+ set html ""
}
return $html
}