minor changes to org and gnus

3 files changed, 8 insertions, 2 deletions

diff --git a/emacs/.emacs.d/init/ycp-gnus.el b/emacs/.emacs.d/init/ycp-gnus.el
index c2b64d5..bf8ffae 100644
--- a/emacs/.emacs.d/init/ycp-gnus.el
+++ b/emacs/.emacs.d/init/ycp-gnus.el
@@ -183,7 +183,8 @@
 (my-package bbdb
   (:delay 5)
   (bbdb-initialize 'gnus 'message)
-  (bbdb-mua-auto-update-init 'gnus 'message)
+  ;; Too noisy
+  ;; (bbdb-mua-auto-update-init 'gnus 'message)
   (setq bbdb-mail-user-agent 'gnus-user-agent)
   (setq bbdb-update-records-p 'create)
   (require 'my-bbdb)
diff --git a/emacs/.emacs.d/init/ycp-org.el b/emacs/.emacs.d/init/ycp-org.el
index 6dbc26e..75d36d7 100644
--- a/emacs/.emacs.d/init/ycp-org.el
+++ b/emacs/.emacs.d/init/ycp-org.el
@@ -41,6 +41,9 @@
   (setq org-catch-invisible-edits 'show)
   (setq org-modules '(ol-bbdb ol-gnus ol-info))
   (setq org-use-sub-superscripts '{})
+  (setq org-todo-keywords
+        '((sequence "TODO(t!)" "DOIN(i!)" "WAIT(w!)" "|"
+                    "DONE(d!)" "OBSO(o!)" "DUPL(u!)")))
   (setq org-use-fast-todo-selection 'expert)
   (setq org-fontify-quote-and-verse-blocks t)
   (setq org-highlight-latex-and-related nil) ; other options affect elisp regexp
diff --git a/emacs/.emacs.d/init/ycp-project.el b/emacs/.emacs.d/init/ycp-project.el
index f6ea925..e5442bb 100644
--- a/emacs/.emacs.d/init/ycp-project.el
+++ b/emacs/.emacs.d/init/ycp-project.el
@@ -28,7 +28,7 @@
 
 
 (my-package my-project
-  (:delay 15)
+  (:delay 30)
   (my-setq-from-local my-projects-root-dirs)
   (my-keybind global-map
     "\C-xpl" #'my-project-copy-license-file-to-project
@@ -42,6 +42,8 @@
    'my-project-remember-all-projects)
   (delete '(project-eshell "Eshell") project-switch-commands)
   (add-to-list 'project-switch-commands '(project-shell "Shell"))
+  (define-key project-prefix-map "m" #'magit-project-status)
+  (add-to-list 'project-switch-commands '(magit-project-status "Magit") t)
   )
 
 (provide 'ycp-project)