From: Your Name <olivier.tetard@amossys.fr>
Date: Mon, 26 Sep 2011 17:14:41 +0000 (+0200)
Subject: .emacs.el: add some more twittering configuration
X-Git-Url: http://olivier.miskin.fr/git/?a=commitdiff_plain;h=c515b1995a3f2e4196ec475ae1adbea77b9a247f;p=dotfiles2.git

.emacs.el: add some more twittering configuration
---

diff --git a/emacs.el b/emacs.el
index d7f37d0..fee867e 100644
--- a/emacs.el
+++ b/emacs.el
@@ -211,6 +211,18 @@ The function is not passed any arguments. The function honours restrictions."
 (push (expand-file-name "~/.elisp/twittering-mode") load-path)
 (require 'twittering-mode)
 (setq twittering-use-master-password t)
+(setq twittering-icon-mode t)
+(setq twittering-timer-interval 300)
+(setq twittering-url-show-status nil)
+(add-hook 'twittering-new-tweets-hook
+	  (lambda ()
+	    (let ((n twittering-new-tweets-count))
+	      (start-process "twittering-notify" nil "notify-send"
+			     "-i" "/usr/share/pixmaps/gnome-emacs.png"
+			     "New tweets"
+			     (format "You have %d new tweet%s"
+				     n (if (> n 1) "s" ""))))))
+
 
 ;; -> END <-
 (custom-set-variables