emacs-orgmode
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[Orgmode] [PATCH 1/3] Add org-eval


From: Julien Danjou
Subject: [Orgmode] [PATCH 1/3] Add org-eval
Date: Fri, 17 Dec 2010 18:18:13 +0100

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

Signed-off-by: Julien Danjou <address@hidden>
---
 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




reply via email to

[Prev in Thread] Current Thread [Next in Thread]