Просмотр исходного кода

org-e-odt-preferred-output-format: Make string values safe

Jambunathan K 13 лет назад
Родитель
Сommit
845daf6648
1 измененных файлов с 8 добавлено и 4 удалено
  1. 8 4
      contrib/lisp/org-e-odt.el

+ 8 - 4
contrib/lisp/org-e-odt.el

@@ -631,12 +631,14 @@ configuration."
 
 
 (defcustom org-e-odt-preferred-output-format nil
 (defcustom org-e-odt-preferred-output-format nil
   "Automatically post-process to this format after exporting to \"odt\".
   "Automatically post-process to this format after exporting to \"odt\".
-Interactive commands `org-export-as-e-odt' and
-`org-export-as-e-odt-and-open' export first to \"odt\" format and
-then use `org-e-odt-convert-process' to convert the
+Command `org-e-odt-export-to-odt' exports first to \"odt\" format
+and then uses `org-e-odt-convert-process' to convert the
 resulting document to this format.  During customization of this
 resulting document to this format.  During customization of this
 variable, the list of valid values are populated based on
 variable, the list of valid values are populated based on
-`org-e-odt-convert-capabilities'."
+`org-e-odt-convert-capabilities'.
+
+You can set this option on per-file basis using file local
+values.  See Info node `(emacs) File Variables'."
   :group 'org-export-e-odt
   :group 'org-export-e-odt
   :version "24.1"
   :version "24.1"
   :type '(choice :convert-widget
   :type '(choice :convert-widget
@@ -647,6 +649,8 @@ variable, the list of valid values are populated based on
 		   ,@(mapcar (lambda (c)
 		   ,@(mapcar (lambda (c)
 			       `(const :tag ,c ,c))
 			       `(const :tag ,c ,c))
 			     (org-e-odt-reachable-formats "odt")))))
 			     (org-e-odt-reachable-formats "odt")))))
+;;;###autoload
+(put 'org-e-odt-preferred-output-format 'safe-local-variable 'stringp)
 
 
 
 
 ;;;; Drawers
 ;;;; Drawers