From 576df31d1e20c5999a50c20bdd2eeaba00097d8a Mon Sep 17 00:00:00 2001
From: Kyle Meyer <kyle@kyleam.com>
Date: Tue, 11 Feb 2014 01:02:56 -0500
Subject: Add mail sync keybinding

---
 lisp/init-gnus.el | 2 ++
 1 file changed, 2 insertions(+)

(limited to 'lisp')

diff --git a/lisp/init-gnus.el b/lisp/init-gnus.el
index b1a1c51..c8120da 100644
--- a/lisp/init-gnus.el
+++ b/lisp/init-gnus.el
@@ -28,6 +28,8 @@
 (defvar km/sync-mail-cmd "~/bin/sync-mail.sh"
   "Run sync mail script.")
 
+(define-key external-map "m" 'km/sync-mail)
+
 ;; http://www.emacswiki.org/emacs/GnusSync
 (defun gnus-grace-exit-before-kill-emacs ()
   (if (and (fboundp 'gnus-alive-p)
-- 
cgit v1.2.3