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