Monday, November 08, 2010 at 12:05 AM.

---

system.verbs.builtins.radio.weblog.getCommentLink

on getCommentLink (postnum, adrblog=radio.weblog.init ()) {
	<<Changes
		<<11/11/02; 5:29:22 PM by JES
			<<Encode & characters in the comments page URL as &.
		<<10/17/02; 12:02:37 AM by JES
			<<A bottleneck routine for getting the comment link for a weblog post. Used by radio.html.commentLink and radio.weblog.writeRssFile.
	if defined (radio.data.appProfile.flCommentsEnabled) {
		if not radio.data.appProfile.flCommentsEnabled {
			return ("")}};
	if not adrblog^.prefs.flCommentLinksEnabled {
		return ("")};
	local (linkarg = "");
	try { //set link
		local (url, catname = "");
		try { //it may be possible for getUrlForPost to fail. we don't want that to cause an error.
			local (pta = html.getPageTableAddress ());
			if defined (pta^.categoryName) { //set catname
				catname = pta^.categoryName}};
		if radio.weblog.getUrlForPost (@adrblog^.posts.[string.padWithZeros (postnum, 8)], @url, catname, adrblog) {
			linkarg = "&link=" + string.urlEncode (url)}};
	return (adrblog^.prefs.commentsPageUrl + "?u=" + user.radio.prefs.usernum + "&p=" + postnum + linkarg)}
<<bundle //test
	<<radio.weblog.getCommentLink (42)

---

This listing is for code that runs in the OPML Editor environment. I created these listings because I wanted the search engines to index it, so that when I want to look up something in my codebase I don't have to use the much slower search functionality in my object database. Dave Winer.