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

---

system.verbs.builtins.radio.trackback.ping

on ping (adrblog, adrpost, adrurl) {
	<<Changes
		<<10/31/03; 1:25:26 PM by JES
			<<If the post is not on the home page, use the permalink URL for the post in the first category in which it appears. Fixes a bug which caused trackback to fail for posts which are not on the home page.
		<<8/8/03; 10:56:43 PM by JES
			<<Fix a bug where HTML markup would be included in the exceprt in outgoing pings.
		<<7/21/03; 1:46:08 AM by JES
			<<Created. Send a TrackBack ping.
	local (title = "");
	if defined (adrpost^.title) {
		title = adrpost^.title};
	local (excerpt = string.firstsentence (searchengine.stripmarkup (string (adrpost^.text))));
	local (url = "");
	bundle { //get the url for this post
		local (catname = "");
		if defined (adrpost^.flNotOnHomePage) {
			if adrpost^.flNotOnHomePage {
				if defined (adrpost^.categories) {
					if sizeOf (adrpost^.categories) > 0 {
						catname = nameOf (adrpost^.categories[1])}}}};
		radio.weblog.getUrlForPost (adrpost, @url, catname, adrblog)};
	trackback.ping (adrurl, adrpost^.title, url, excerpt, adrblog^.prefs.title);
	return}
<<bundle //testing
	<<local (adrblog = @weblogData)
	<<local (adrpost = @weblogData.posts.["00000212"])
	<<ping (adrblog, adrpost, @scratchpad.url)

---

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.