* org-agenda.el (org-eval): New function.

Signed-off-by: Julien Danjou <jul...@danjou.info>
---
 lisp/org-agenda.el |    6 ++++++
 1 files changed, 6 insertions(+), 0 deletions(-)

diff --git a/lisp/org-agenda.el b/lisp/org-agenda.el
index 19535b4..a23d7d7 100644
--- a/lisp/org-agenda.el
+++ b/lisp/org-agenda.el
@@ -5369,6 +5369,12 @@ The modified list may contain inherited tags, and tags 
matched by
          (append new list)
        (append list new)))))
 
+(defun org-eval (form)
+  "Eval FORM and return result."
+  (condition-case error
+      (eval form)
+    (error (format "%%![Error: %s]" error))))
+
 (defun org-compile-prefix-format (key)
   "Compile the prefix format into a Lisp form that can be evaluated.
 The resulting form is returned and stored in the variable
-- 
1.7.2.3


_______________________________________________
Emacs-orgmode mailing list
Please use `Reply All' to send replies to the list.
Emacs-orgmode@gnu.org
http://lists.gnu.org/mailman/listinfo/emacs-orgmode

Reply via email to