24 May, 2010

 

Pop-up emacs twitter posting

Mostly just taken from the remember-mode popup, but here it is:


(add-hook 'twitter-status-edit-mode-hook    
'delete-other-windows)

(defadvice twitter-kill-status-buffer (after delete-twitter-frame activate)
"Advise to close the frame if it is the twitter frame"
(if (equal "twitter" (frame-parameter nil 'name))
(delete-frame)))

(defadvice twitter-status-post (after delete-twitter-frame activate)
"Advise to close the frame if it is the twitter frame"
(if (equal "twitter" (frame-parameter nil 'name))
(delete-frame)))

(defun make-twitter-frame ()
"Create a new frame and run twitter post."
(interactive) (make-frame '((name . "twitter") (width . 80) (height . 15)))
(select-frame-by-name "twitter")
(twitter-status-edit))

I have it bound to Ctrl+Alt+Shift+T in gnome


Comments: Post a Comment

Links to this post:

Create a Link



<< Home

This page is powered by Blogger. Isn't yours?

Social bookmarks

Delicious

Bookmark this on Delicious

Links

Support The Commons









This site:

Free your code:

archives