tec/org-mode
tec
/
org-mode
forked from mirrors/org-mode
1
0
Fork 0
Code Pull Requests Releases Activity

org-list.el: Rename some options and add aliases 

* org-list.el (org-cycle-include-plain-lists): Also add to the
'org-cycle customization group.
(org-list-allow-alphabetical)
(org-checkbox-hierarchical-statistics)
(org-list-empty-line-terminates-plain-lists)
(org-list-description-max-indent): Rename and add aliases to old
names.
This commit is contained in:
Bastien Guerry 2013-03-14 13:41:06 +01:00
parent a5a676e609
commit 8481088c4a
1 changed files with 13 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

17
lisp/org-list.el
View File

@ -161,6 +161,7 @@ plain list item with an implied large level number, all true
children and grand children of the outline heading will be children and grand children of the outline heading will be
exposed in a children' view." exposed in a children' view."
:group 'org-plain-lists :group 'org-plain-lists
:group 'org-cycle
:type '(choice :type '(choice
(const :tag "Never" nil) (const :tag "Never" nil)
(const :tag "With cursor in plain list (recommended)" t) (const :tag "With cursor in plain list (recommended)" t)
@ -216,7 +217,9 @@ Valid values are ?. and ?\). To get both terminators, use t."
(const :tag "paren like in \"2)\"" ?\)) (const :tag "paren like in \"2)\"" ?\))
(const :tag "both" t))) (const :tag "both" t)))
(defcustom org-alphabetical-lists nil (defvaralias 'org-alphabetical-lists
'org-list-allow-alphabetical) ;; Since 8.0
(defcustom org-list-allow-alphabetical nil
"Non-nil means single character alphabetical bullets are allowed. "Non-nil means single character alphabetical bullets are allowed.
Both uppercase and lowercase are handled. Lists with more than Both uppercase and lowercase are handled. Lists with more than
26 items will fallback to standard numbering. Alphabetical 26 items will fallback to standard numbering. Alphabetical
@ -237,7 +240,9 @@ spaces instead of one after the bullet in each item of the list."
(const :tag "never" nil) (const :tag "never" nil)
(regexp))) (regexp)))
(defcustom org-empty-line-terminates-plain-lists nil (defvaralias 'org-empty-line-terminates-plain-lists
'org-list-empty-line-terminates-plain-lists) ;; Since 8.0
(defcustom org-list-empty-line-terminates-plain-lists nil
"Non-nil means an empty line ends all plain list levels. "Non-nil means an empty line ends all plain list levels.
Otherwise, two of them will be necessary." Otherwise, two of them will be necessary."
:group 'org-plain-lists :group 'org-plain-lists
@ -289,7 +294,9 @@ This hook runs even if checkbox rule in
implement alternative ways of collecting statistics implement alternative ways of collecting statistics
information.") information.")
(defcustom org-hierarchical-checkbox-statistics t (defvaralias 'org-hierarchical-checkbox-statistics
'org-checkbox-hierarchical-statistics) ;; Since 8.0
(defcustom org-checkbox-hierarchical-statistics t
"Non-nil means checkbox statistics counts only the state of direct children. "Non-nil means checkbox statistics counts only the state of direct children.
When nil, all boxes below the cookie are counted. When nil, all boxes below the cookie are counted.
This can be set to nil on a per-node basis using a COOKIE_DATA property This can be set to nil on a per-node basis using a COOKIE_DATA property
@ -297,7 +304,9 @@ with the word \"recursive\" in the value."
:group 'org-plain-lists :group 'org-plain-lists
:type 'boolean) :type 'boolean)
(defcustom org-description-max-indent 20 (defvaralias 'org-description-max-indent
'org-list-description-max-indent) ;; Since 8.0
(defcustom org-list-description-max-indent 20
"Maximum indentation for the second line of a description list. "Maximum indentation for the second line of a description list.
When the indentation would be larger than this, it will become When the indentation would be larger than this, it will become
5 characters instead." 5 characters instead."