X-Git-Url: http://olivier.miskin.fr/git/?a=blobdiff_plain;f=emacs.el;h=fee867e28bcd7906b517c04605ea892cd83fc8ee;hb=7d0da02e598cbd647dc033994ef9d5f23a8d0092;hp=8042a2bc371c7055cbb3326a3a5cee6dfb8cdbea;hpb=1fdb3a473077d11ff0e8d8748d11c0b800c52122;p=dotfiles2.git

diff --git a/emacs.el b/emacs.el
index 8042a2b..fee867e 100644
--- a/emacs.el
+++ b/emacs.el
@@ -207,6 +207,23 @@ The function is not passed any arguments. The function honours restrictions."
 (setq-default c-basic-offset 8)
 (setq-default indent-tabs-mode t)
 
+;; Twitter !
+(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
  ;; custom-set-variables was added by Custom.