From b330329c725f32e97f3a8ede1342670c159fb465 Mon Sep 17 00:00:00 2001
From: Tom Willemse
Date: Sat, 4 May 2013 11:33:47 +0200
Subject: Add function to skip all tasks with `ex' as tag

---
 emacs/site-lisp/oni.el | 7 +++++++
 1 file changed, 7 insertions(+)

(limited to 'emacs/site-lisp/oni.el')

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.
 
-- 
cgit v1.2.3-54-g00ecf