org-todo-at-date
This commit is contained in:
parent
5de954bc8e
commit
efa53182f8
22
init.el
22
init.el
@ -650,12 +650,21 @@ The current directory is assumed to be the project's root otherwise."
|
||||
`("g" "GTD Todo" entry (file+headline ,org-gtd-file "Tasks")
|
||||
"* TODO %?\n"))
|
||||
|
||||
|
||||
(defun org-insert-habit ()
|
||||
(interactive)
|
||||
(org-insert-todo-heading nil)
|
||||
(org-make-habit))
|
||||
|
||||
(defun org-date-time-to-internal-time (org-date)
|
||||
`(,@(apply 'encode-time
|
||||
(mapcar (lambda (elem) (if elem elem 0))
|
||||
(subseq (parse-time-string org-date) 0 6))) 0 0))
|
||||
|
||||
(defun org-todo-at-date (date)
|
||||
(interactive (list (org-time-string-to-time (org-read-date))))
|
||||
(flet ((org-current-effective-time (&rest r) date))
|
||||
(org-todo)))
|
||||
|
||||
(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"))
|
||||
|
||||
@ -977,15 +986,16 @@ The current directory is assumed to be the project's root otherwise."
|
||||
(defun do-ag (&optional arg)
|
||||
(interactive "P")
|
||||
(if arg (helm-do-ag) (helm-projectile-ag)))
|
||||
(unbind-key "C-c p s a" projectile-command-map)
|
||||
(unbind-key "C-c p s g" projectile-command-map)
|
||||
(unbind-key "C-c p s s" projectile-command-map)
|
||||
(unbind-key "C-c p s" projectile-command-map)
|
||||
(projectile-global-mode)
|
||||
(setq projectile-enable-caching t)
|
||||
(setq projectile-completion-system 'helm)
|
||||
(helm-projectile-on)
|
||||
(diminish 'projectile-mode))
|
||||
(diminish 'projectile-mode)
|
||||
(unbind-key "C-c p s a" projectile-command-map)
|
||||
(unbind-key "C-c p s g" projectile-command-map)
|
||||
(unbind-key "C-c p s s" projectile-command-map)
|
||||
(unbind-key "C-c p s" projectile-command-map)
|
||||
(bind-key* "C-c p s" 'do-ag))
|
||||
:bind (("C-x f" . projectile-find-file-in-known-projects))
|
||||
:init
|
||||
(progn
|
||||
|
Loading…
Reference in New Issue
Block a user