literate init in config.org

This commit is contained in:
Ivan Malison 2016-06-06 11:57:27 -07:00
parent 5fd4d5ad55
commit 5708686c35
3 changed files with 30 additions and 2 deletions

2
.gitignore vendored
View File

@ -40,3 +40,5 @@ config/google-chrome
/dotfiles/vim/bundle/* /dotfiles/vim/bundle/*
/dotfiles/wemo/cache /dotfiles/wemo/cache
gotools gotools
dotfiles/emacs.d/config.el

View File

@ -1,3 +1,4 @@
#+BEGIN_SRC emacs-lisp
;; -*- lexical-binding: t; -*- ;; -*- lexical-binding: t; -*-
;; ============================================================================= ;; =============================================================================
;; ___ _ __ ___ __ _ ___ ___ ;; ___ _ __ ___ __ _ ___ ___
@ -1119,7 +1120,7 @@ the same tree node, and the headline of the tree node in the Org-mode file."
(setq org-show-notification-handler 'imalison:org-notify-notification-handler) (setq org-show-notification-handler 'imalison:org-notify-notification-handler)
(org-notify-add 'default '(:time "1h" :actions imalison:org-notify-notification-handler (org-notify-add 'default '(:time "1h" :actions imalison:org-notify-notification-handler
:period "2m" :duration 60)) :period "2m" :duration 60))
(org-notify-add 'default '(:time "100m" :actions imalison:org-notify-notification-handler (org-notify-add 'default '(:time "100m" :actions imalison:org-notify-notification-handler
:period "2m" :duration 60)) :period "2m" :duration 60))
(org-notify-add 'urgent-second '(:time "3m" :actions (-notify/window -ding) (org-notify-add 'urgent-second '(:time "3m" :actions (-notify/window -ding)
@ -1269,7 +1270,7 @@ the same tree node, and the headline of the tree node in the Org-mode file."
,(cons "A" (cons "High priority upcoming" this-week-high-priority)) ,(cons "A" (cons "High priority upcoming" this-week-high-priority))
,(cons "d" (cons "Overdue tasks and due today" due-today)) ,(cons "d" (cons "Overdue tasks and due today" due-today))
,(cons "r" (cons "Recently created" recently-created)) ,(cons "r" (cons "Recently created" recently-created))
("h" "A, B priority:" tags-todo "+PRIORITY<\"C\"" ("h" "A, B priority:" tags-todo "+PRIORITY<\"C\""
((org-agenda-overriding-header ((org-agenda-overriding-header
"High Priority:"))) "High Priority:")))
("c" "At least priority C:" tags-todo "+PRIORITY<\"D\"" ("c" "At least priority C:" tags-todo "+PRIORITY<\"D\""
@ -2572,3 +2573,4 @@ items follow a style that is consistent with other prog-modes."
;; Local Variables: ;; Local Variables:
;; flycheck-disabled-checkers: (emacs-lisp-checkdoc) ;; flycheck-disabled-checkers: (emacs-lisp-checkdoc)
;; End: ;; End:
#+END_SRC

24
dotfiles/emacs.d/init.el Normal file
View File

@ -0,0 +1,24 @@
(require 'package)
(add-to-list 'package-archives '("org" . "https://orgmode.org/elpa/") t)
(defun ensure-packages-installed (packages)
(unless package-archive-contents
(package-refresh-contents))
(mapcar
(lambda (package)
(if (package-installed-p package)
package
(progn (message (format "Installing package %s." package))
(package-install package))))
packages))
(package-initialize)
(ensure-packages-installed '(org-plus-contrib))
(org-babel-load-file
(concat (file-name-directory load-file-name) "config.org"))
;; Local Variables:
;; flycheck-disabled-checkers: (emacs-lisp-checkdoc)
;; End: