diff options
author | Carsten Dominik <carsten.dominik@gmail.com> | 2010-12-20 15:49:44 +0100 |
---|---|---|
committer | Carsten Dominik <carsten.dominik@gmail.com> | 2010-12-20 15:49:44 +0100 |
commit | f11b134b46fa7aeb16eb18861ca49529af6822b2 (patch) | |
tree | d694a9dcc05f47f673ece3d340d6d5ec556f9f06 | |
parent | 2d47a109b2bbe7739fcbe0ff6384070e0dee7c6b (diff) | |
parent | 2c1925f2a5135e46f70ae5267b052d0bc48ae9f7 (diff) | |
download | org-mode-f11b134b46fa7aeb16eb18861ca49529af6822b2.tar.gz |
Merge branch 't/patch489'
-rw-r--r-- | 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 df77615..23ad0e7 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 |