summaryrefslogtreecommitdiff
path: root/lisp/init-org.el
diff options
context:
space:
mode:
Diffstat (limited to 'lisp/init-org.el')
-rw-r--r--lisp/init-org.el9
1 files changed, 9 insertions, 0 deletions
diff --git a/lisp/init-org.el b/lisp/init-org.el
index beda4a1..96cae0c 100644
--- a/lisp/init-org.el
+++ b/lisp/init-org.el
@@ -99,6 +99,7 @@ The hook functions and `org-store-link' are called within a
(define-key km/global-org-map "l" 'km/org-store-link)
(define-key km/global-org-map "o" 'org-open-at-point-global)
(define-key km/global-org-map "a" 'org-agenda)
+(define-key km/global-org-map "j" 'km/org-goto-agenda-heading)
(define-key km/global-org-map "b" 'org-iswitchb)
(define-key km/global-org-map "s" 'org-save-all-org-buffers)
(define-key km/global-org-map "w" 'org-refile-goto-last-stored)
@@ -395,6 +396,14 @@ displayed in the agenda."
(org-agenda-overriding-header "Unscheduled TODO entries: ")))
("p" "Past timestamps" tags "TIMESTAMP<=\"<now>\"")))
+(defun km/org-goto-agenda-heading ()
+ "Jump to heading in agenda files."
+ (interactive)
+ (let ((org-refile-targets
+ '((org-agenda-files :maxlevel . 3)
+ (org-agenda-text-search-extra-files :maxlevel . 3))))
+ (org-refile '(4))))
+
;;; Refiling
(defun km/verify-refile-target ()