فهرست منبع

Add some `:safe' keywords

* lisp/org-src.el (org-edit-src-content-indentation):
* lisp/org.el (org-adapt-indentation): Add :safe keyword.
Nicolas Goaziou 8 سال پیش
والد
کامیت
9bbee7d3c8
2فایلهای تغییر یافته به همراه5 افزوده شده و 3 حذف شده
  1. 2 1
      lisp/org-src.el
  2. 3 2
      lisp/org.el

+ 2 - 1
lisp/org-src.el

@@ -128,7 +128,8 @@ editing it with `\\[org-edit-src-code]'.
 
 
 It has no effect if `org-src-preserve-indentation' is non-nil."
 It has no effect if `org-src-preserve-indentation' is non-nil."
   :group 'org-edit-structure
   :group 'org-edit-structure
-  :type 'integer)
+  :type 'integer
+  :safe #'wholenump)
 
 
 (defcustom org-edit-src-persistent-message t
 (defcustom org-edit-src-persistent-message t
   "Non-nil means show persistent exit help message while editing src examples.
   "Non-nil means show persistent exit help message while editing src examples.

+ 3 - 2
lisp/org.el

@@ -1474,11 +1474,12 @@ stars).  The following issues are influenced by this variable:
   a headline will be indented when this variable is set.
   a headline will be indented when this variable is set.
 
 
 Note that this is all about true indentation, by adding and
 Note that this is all about true indentation, by adding and
-removing space characters.  See also `org-indent.el' which does
+removing space characters.  See also \"org-indent.el\" which does
 level-dependent indentation in a virtual way, i.e. at display
 level-dependent indentation in a virtual way, i.e. at display
 time in Emacs."
 time in Emacs."
   :group 'org-edit-structure
   :group 'org-edit-structure
-  :type 'boolean)
+  :type 'boolean
+  :safe #'booleanp)
 
 
 (defcustom org-special-ctrl-a/e nil
 (defcustom org-special-ctrl-a/e nil
   "Non-nil means `C-a' and `C-e' behave specially in headlines and items.
   "Non-nil means `C-a' and `C-e' behave specially in headlines and items.