ryuslash/legacy-dotfiles
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity

Add function to skip all tasks with `ex' as tag

Browse source
This commit is contained in:
Tom Willemse 2013-05-04 11:33:47 +02:00
parent ca90f4623b
commit b330329c72
1 changed files with 7 additions and 0 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

7
emacs/site-lisp/oni.el
View file

@ -454,6 +454,13 @@ insert at the end of the region and at the beginning."
(interactive)
(find-file "~/documents/org/index.org"))
(defun oni:skip-ex-tag ()
(let ((tags (org-entry-get (point) "TAGS")))
(when (and tags (string-match-p ":ex:" tags))
(save-excursion
(org-forward-element)
(point)))))
(defun oni:split-window-interactive (dir)
"Split windows in direction DIR.