Add function weibo-url-shorten-at-point in weibo.el.

Implemented url shortening with weibo API. The function can be called when cursor is on the url with M-x weibo-url-shorten-at-point.