From 5399d2d61dad2bdfe695d25589ea98c93fa925f7 Mon Sep 17 00:00:00 2001 From: Miquel Sabaté Solà Date: Tue, 27 Dec 2016 00:41:09 +0100 Subject: emacs: starting org-mode configuration MIME-Version: 1.0 Content-Type: text/plain; charset=UTF-8 Content-Transfer-Encoding: 8bit Signed-off-by: Miquel Sabaté Solà --- emacs/init.el | 1 + emacs/settings/init-org.el | 56 ++++++++++++++++++++++++++++++++++++++++++++++ 2 files changed, 57 insertions(+) create mode 100644 emacs/settings/init-org.el (limited to 'emacs') diff --git a/emacs/init.el b/emacs/init.el index b1b1e4d..3f6e45f 100644 --- a/emacs/init.el +++ b/emacs/init.el @@ -94,6 +94,7 @@ (require 'init-evil) (require 'init-magit) (require 'init-mu4e) +(require 'init-org) (require 'init-lang) (provide 'init) diff --git a/emacs/settings/init-org.el b/emacs/settings/init-org.el new file mode 100644 index 0000000..89dc189 --- /dev/null +++ b/emacs/settings/init-org.el @@ -0,0 +1,56 @@ +;;; init-org.el --- Configuration for mu4e + +;; Copyright (C) 2016 Miquel Sabaté Solà +;; +;; This program is free software: you can redistribute it and/or modify +;; it under the terms of the GNU General Public License as published by +;; the Free Software Foundation, either version 3 of the License, or +;; (at your option) any later version. +;; +;; This program is distributed in the hope that it will be useful, +;; but WITHOUT ANY WARRANTY; without even the implied warranty of +;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the +;; GNU General Public License for more details. + +;;; Commentary: +;; +;; Configuration for org mode. + +;;; Code: + +(require 'org) + +;; TODO + +(with-eval-after-load 'evil + ; TODO: doesn't work + (define-key global-map (kbd "M-h") 'help-command) + (fset 'help-command help-map)) + +; TODO: this might overlap some existing keybindings +(global-set-key "\C-cl" 'org-store-link) +(global-set-key "\C-ca" 'org-agenda) +(global-set-key "\C-cb" 'org-iswitchb) +(setq org-log-done t) + +(setq org-todo-keywords + '((sequence "TODO(t)" "|" "DONE(d!)") + (sequence "BUG(b)" "|" "RESOLVED(r@/!)" "WONTFIX(w@/!)" "FIXED(f@/!)") + (sequence "IDEA(i)" "WORKING(w)" "|" "USED(u@/!)" "DISCARDED(x@/!)"))) + +(setq org-todo-keyword-faces + '(("TODO" . org-todo) + ("BUG" . org-todo) + ("IDEA" . font-lock-constant-face) + ("WORKING" . font-lock-constant-face) + ("DONE" . org-done) + ("RESOLVED" . org-done) + ("WONTFIX" . org-done) + ("FIXED" . org-done) + ("USED" . org-done) + ("DISCARDED" . org-done))) + +;; TODO: wc mode in org-mode + +(provide 'init-org) +;;; init-org.el ends here -- cgit v1.2.3