From 4f73cfbd80af05a4fbbad2baa449a88e632ca596 Mon Sep 17 00:00:00 2001
From: syl20bnr <sylvain.benner@gmail.com>
Date: Sat, 5 Jan 2013 17:15:42 -0500
Subject: [PATCH] added twittering mode

---
 init-package/init-twittering-mode.el | 26 ++++++++++++++++++++++++++
 my-keychords.el                      |  1 +
 packages.el                          |  2 +-
 3 files changed, 28 insertions(+), 1 deletion(-)
 create mode 100644 init-package/init-twittering-mode.el

diff --git a/init-package/init-twittering-mode.el b/init-package/init-twittering-mode.el
new file mode 100644
index 000000000..9504f7c77
--- /dev/null
+++ b/init-package/init-twittering-mode.el
@@ -0,0 +1,26 @@
+(setq twittering-use-master-password t)
+(setq twittering-icon-mode t)                ; Show icons
+(setq twittering-timer-interval 300)         ; Update your timeline each 300 seconds (5 minutes)
+(setq twittering-url-show-status nil)        ; Keeps the echo area from showing all the http processes
+
+;; spell check
+(add-hook 'twittering-edit-mode-hook (lambda () (ispell-minor-mode) (flyspell-mode)))
+
+;; timelines opened at startup
+(setq twittering-initial-timeline-spec-string '(
+        ":direct_messages"
+        ":replies"
+        ":home"
+;;        ":search/emacs/"
+;;        "user_name/list_name"
+        ))
+
+;; add follow URL by pressing 'o'
+(add-hook 'twittering-mode-hook
+          (lambda ()
+            (mapc (lambda (pair)
+                    (let ((key (car pair))
+                          (func (cdr pair)))
+                      (define-key twittering-mode-map
+                        (read-kbd-macro key) func)))
+                  '(("o" . twittering-click)))))
diff --git a/my-keychords.el b/my-keychords.el
index 4af3f5a6f..bff3a79ba 100644
--- a/my-keychords.el
+++ b/my-keychords.el
@@ -7,6 +7,7 @@
 ;; applications ---------------------------------------------------------------
 (key-chord-define evil-normal-state-map "ae" 'erc-start-or-switch)
 (key-chord-define evil-normal-state-map "am" 'mu4e-up-to-date-status)
+(key-chord-define evil-normal-state-map "at" 'twit)
 ;; buffers --------------------------------------------------------------------
 (key-chord-define evil-normal-state-map "bk" 'ido-kill-buffer)
 (key-chord-define evil-normal-state-map "BK" 'delete-current-buffer-file)
diff --git a/packages.el b/packages.el
index df2ebd47c..8499664a1 100644
--- a/packages.el
+++ b/packages.el
@@ -48,7 +48,7 @@
     solarized-theme
     sr-speedbar
     surround
-    webjump
+    twittering-mode
     yasnippet
     ))