From 4947d25c7c348b45d26b3087ca9dd7b050dc2dbb Mon Sep 17 00:00:00 2001 From: Nicolas Goaziou Date: Wed, 24 Dec 2014 10:32:30 +0100 Subject: [PATCH] ob-core: Add safety test for results keyword value * lisp/ob-core.el (org-babel-results-keyword): Add safety test. Fix docstring. --- lisp/ob-core.el | 9 +++++++-- 1 file changed, 7 insertions(+), 2 deletions(-) diff --git a/lisp/ob-core.el b/lisp/ob-core.el index c4dbea64b..93fcb2a89 100644 --- a/lisp/ob-core.el +++ b/lisp/ob-core.el @@ -137,11 +137,16 @@ remove code block execution from the C-c C-c keybinding." (defcustom org-babel-results-keyword "RESULTS" "Keyword used to name results generated by code blocks. -It should be RESULTS. However any capitalization may be used." +It should be \"RESULTS\". However any capitalization may be +used." :group 'org-babel :version "24.4" :package-version '(Org . "8.0") - :type 'string) + :type 'string + :safe (lambda (v) + (and (stringp v) + (eq (compare-strings "RESULTS" nil nil v nil nil t) + t)))) (defcustom org-babel-noweb-wrap-start "<<" "String used to begin a noweb reference in a code block. -- 2.11.4.GIT