emacs-orgmode
[Top][All Lists]
Advanced

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

[O] [PATCH 3/3] mark o-b-default-header-args:R as a safe local under pro


From: Aaron Ecay
Subject: [O] [PATCH 3/3] mark o-b-default-header-args:R as a safe local under proper conditions
Date: Mon, 28 Oct 2013 16:19:03 -0400

* lisp/ob-R.el (org-babel-default-header-args:R): mark as a safe local
variable
---
 lisp/ob-R.el | 16 ++++++++++++++++
 1 file changed, 16 insertions(+)

diff --git a/lisp/ob-R.el b/lisp/ob-R.el
index 74d7513..2086622 100644
--- a/lisp/ob-R.el
+++ b/lisp/ob-R.el
@@ -66,6 +66,22 @@
   "R-specific header arguments.")
 
 (defvar org-babel-default-header-args:R '())
+(put 'org-babel-default-header-args:R 'safe-local-variable
+     (lambda (value)
+       (and (listp value)
+           (and (mapcar
+                 (lambda (pair)
+                   (and (consp pair)
+                        (or (org-babel-one-header-arg-safe-p pair)
+                            (memq (car pair)
+                                  '(:width :height :bg
+                                           :units :pointsize :antialias
+                                           :quality :compression :res
+                                           :type :family :title :fonts
+                                           :version :paper :encoding
+                                           :pagecentre :colormodel
+                                           :useDingbats :horizontal)))))
+                 value)))))
 
 (defcustom org-babel-R-command "R --slave --no-save"
   "Name of command to use for executing R code."
-- 
1.8.4.1




reply via email to

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