diff options
| author |  Tom Willemse | 2013-05-04 11:33:47 +0200 |
|---|---|---|
| committer | Tom Willemse | 2013-05-04 11:33:47 +0200 |
| commit | b330329c725f32e97f3a8ede1342670c159fb465 (patch) | |
| tree | d859ac224e9afa101151ed3d1e90fb9823ae9969 | |
| parent | ca90f4623b44157ffa08555b4ac448d1b440ac5f (diff) | |
| download | dotfiles-b330329c725f32e97f3a8ede1342670c159fb465.tar.gz dotfiles-b330329c725f32e97f3a8ede1342670c159fb465.zip | |
Add function to skip all tasks with `ex' as tag
| -rw-r--r-- | emacs/site-lisp/oni.el | 7 |
1 files changed, 7 insertions, 0 deletions
diff --git a/emacs/site-lisp/oni.el b/emacs/site-lisp/oni.el index 3113dec..1fb56d0 100644 --- a/emacs/site-lisp/oni.el +++ b/emacs/site-lisp/oni.el @@ -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. |