Moving all of my Emacs-related files into their own directory at the root of this repository.
		
			
				
	
	
		
			70 lines
		
	
	
	
		
			2.5 KiB
		
	
	
	
		
			EmacsLisp
		
	
	
	
	
	
			
		
		
	
	
			70 lines
		
	
	
	
		
			2.5 KiB
		
	
	
	
		
			EmacsLisp
		
	
	
	
	
	
| ;;; org.el --- My org preferences -*- lexical-binding: t -*-
 | |
| ;; Author: William Carroll <wpcarro@gmail.com>
 | |
| 
 | |
| ;;; Commentary:
 | |
| ;; Hosts my org mode preferences
 | |
| 
 | |
| ;;; Code:
 | |
| 
 | |
| ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
 | |
| ;; Dependencies
 | |
| ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
 | |
| 
 | |
| (require 'f)
 | |
| 
 | |
| ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
 | |
| ;; Configuration
 | |
| ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
 | |
| 
 | |
| (setq org-directory "~/Dropbox/org")
 | |
| 
 | |
| ;; TODO: figure out how to nest this in (use-package org ...)
 | |
| (setq org-capture-templates
 | |
|       `(("w" "work" entry (file+headline
 | |
|                            ,(f-join org-directory "work.org")
 | |
|                            "Tasks")
 | |
|          "* TODO %?")
 | |
|         ("p" "personal" entry (file+headline
 | |
|                                ,(f-join org-directory "personal.org")
 | |
|                                "Tasks")
 | |
|          "* TODO %? ")
 | |
|         ("i" "ideas" entry (file+headline
 | |
|                             ,(f-join org-directory "ideas.org")
 | |
|                             "Tasks")
 | |
|          "* %? ")
 | |
|         ("s" "shopping list" entry (file+headline
 | |
|                             ,(f-join org-directory "shopping.org")
 | |
|                             "Items")
 | |
|          "* TODO %? ")))
 | |
| 
 | |
| (evil-set-initial-state 'org-mode 'normal)
 | |
| 
 | |
| (use-package org
 | |
|   :config
 | |
|   (general-add-hook 'org-mode-hook
 | |
|                     ;; TODO: consider supporting `(disable (list linum-mode company-mode))'
 | |
|                     (list (disable linum-mode)
 | |
|                           (disable company-mode)))
 | |
|   (general-define-key :prefix "C-c"
 | |
|            "l" #'org-store-link
 | |
|            "a" #'org-agenda
 | |
|            "c" #'org-capture)
 | |
|   (setq org-startup-folded nil)
 | |
|   (setq org-todo-keywords
 | |
|         '((sequence "TODO" "BLOCKED" "DONE")))
 | |
|   (setq org-default-notes-file (f-join org-directory "notes.org"))
 | |
|   (setq org-agenda-files (list (f-join org-directory "work.org")
 | |
|                                (f-join org-directory "personal.org")))
 | |
|   ;; TODO: troubleshoot why `wpc/kbds-minor-mode', `wpc/ensure-kbds' aren't
 | |
|   ;; enough to override the following KBDs. See this discussion for more context
 | |
|   ;; on where the idea came from:
 | |
|   ;; https://stackoverflow.com/questions/683425/globally-override-key-binding-in-emacs
 | |
|   (general-unbind 'normal org-mode-map "M-h" "M-j" "M-k" "M-l"))
 | |
| 
 | |
| (use-package org-bullets
 | |
|   :after (org)
 | |
|   :config
 | |
|   (general-add-hook 'org-mode-hook (enable org-bullets-mode)))
 | |
| 
 | |
| (provide 'wpc-org)
 | |
| ;;; wpc-org.el ends here
 |