I’m using the following script to ping after I post my blog. It is very slow to run, a assume this is due to the part that calls: "using terms from application “http://www.apple.com/placebo”. Is there a better way to do this?
set BlogName to "My Blog Name"
set BlogAddress to "http://my.blog.url"
set PingList to {{"http://rpc.pingomatic.com/", "weblogUpdates.ping"}, {"http://ping.dotmac.info", "weblogUpdates.ping"}}
--Note: ping-o-matic will forward pings to Weblogs.com, Blo.gs, Technorati, MyYahoo!, BlogRolling, BlogChatter, PubSub
--Example list of multiple {{"http://rpc.technorati.com/rpc/ping", "weblogUpdates.ping"}, {"http://ping.blo.gs/", "weblogUpdates.ping"}}
set returnValue to ""
repeat with n from 1 to (count of PingList)
set AppName to item 1 of (item n of PingList) as string
set theMethod to item 2 of (item n of PingList) as string
--try
--with timeout of 15 seconds
using terms from application "http://www.apple.com/placebo"
tell application AppName
set returnValue to call xmlrpc {method name:theMethod, parameters:{BlogName, BlogAddress}}
end tell
end using terms from
if flerror of returnValue is false and message of returnValue is not "" then log message of returnValue
if flerror of returnValue is true then log "There was an error, " & message of returnValue
end repeat