[Top][All Lists]
[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
- [Orgmode] [PATCH 1/3] Add org-eval,
Julien Danjou <=