wgester/dotfiles
1
0
Fork 0
forked from colonelpanic/dotfiles
Code Pull Requests Activity

Updates for new version of org-projectile

Browse Source
This commit is contained in:
Ivan Malison 2014-12-09 19:31:59 -08:00
parent eecd210e51
commit 87d2be1b62
2 changed files with 13 additions and 7 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
.gitignore vendored
View File

@ -8,7 +8,6 @@ backups
eshell eshell
url url
bookmarks bookmarks
elpa elpa
.python-environments/ .python-environments/
tramp tramp
@ -22,4 +21,5 @@ var
skewer-cache skewer-cache
.org-id-locations .org-id-locations
jabber-avatar-cache jabber-avatar-cache
this-machine.el this-machine.el
recentf

16
init.el
View File

@ -267,7 +267,13 @@ buffer is not visiting a file."
(defun growl-notify (title message) (defun growl-notify (title message)
(shell-command (format "grownotify -t %s -m %s" title message))) (shell-command (format "grownotify -t %s -m %s" title message)))
(defvar notify-function 'notification-center) (defun notify-send (title message)
(shell-command (format "notify-send -u critical %s %s" title message)))
(defvar notify-function
(cond ((eq system-type 'darwin) 'notification-center)
((eq system-type 'gnu/linux) 'notify-send)))
(defun project-root-of-file (filename) (defun project-root-of-file (filename)
"Retrieves the root directory of a project if available. "Retrieves the root directory of a project if available.
@ -425,7 +431,7 @@ The current directory is assumed to be the project's root otherwise."
(progn (progn
(diminish 'magit-auto-revert-mode) (diminish 'magit-auto-revert-mode)
(use-package magit-filenotify (use-package magit-filenotify
;; Seems like OSX does not properly this. ;; Seems like OSX does not support filenotify.
:disabled t :disabled t
:ensure t :ensure t
:if (emacs24_4-p) :if (emacs24_4-p)
@ -601,15 +607,15 @@ The current directory is assumed to be the project's root otherwise."
(add-to-list 'org-capture-templates (add-to-list 'org-capture-templates
`("g" "GTD Todo" entry (file+headline ,org-gtd-file "Tasks") `("g" "GTD Todo" entry (file+headline ,org-gtd-file "Tasks")
"* TODO %?\n")) "* TODO %?\n"))
(defun org-insert-habit () (defun org-insert-habit ()
(interactive) (interactive)
(org-insert-todo-heading nil) (org-insert-todo-heading nil)
(org-make-habit)) (org-make-habit))
(add-to-list 'org-capture-templates (org-projectile:project-todo-entry)) (add-to-list 'org-capture-templates (org-projectile:project-todo-entry "p"))
(add-to-list 'org-capture-templates (org-projectile:project-todo-entry "l" "* TODO %? %a\n"))
(add-to-list 'org-modules 'org-habit)
(let ((this-week-high-priority (let ((this-week-high-priority
'(tags-todo "+PRIORITY=\"A\"+DEADLINE<\"<+1w>\"DEADLINE>\"<+0d>\"" '(tags-todo "+PRIORITY=\"A\"+DEADLINE<\"<+1w>\"DEADLINE>\"<+0d>\""