ndwarshuis
/
org-mode
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

org.el (org-emphasis-regexp-components): Make a defvar 

* org.el (org-emphasis-regexp-components): Make a defvar.

This used to be a defcustom (Org <8.0) but allowing the users to
set this option proved cumbersome.  See this message/thread:
http://article.gmane.org/gmane.emacs.orgmode/68681
This commit is contained in:
Bastien Guerry 2013-04-12 08:05:28 +02:00
parent f86f664325
commit dc577b253b
1 changed files with 5 additions and 11 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

16
lisp/org.el
View File

@ -4050,7 +4050,10 @@ After a match, the match groups contain these elements:
"\\3\\)" "\\3\\)"
"\\([" post "]\\|$\\)"))))) "\\([" post "]\\|$\\)")))))
(defcustom org-emphasis-regexp-components ;; This used to be a defcustom (Org <8.0) but allowing the users to
;; set this option proved cumbersome. See this message/thread:
;; http://article.gmane.org/gmane.emacs.orgmode/68681
(defvar org-emphasis-regexp-components
'(" \t('\"{" "- \t.,:!?;'\")}\\" " \t\r\n,\"'" "." 1) '(" \t('\"{" "- \t.,:!?;'\")}\\" " \t\r\n,\"'" "." 1)
"Components used to build the regular expression for emphasis. "Components used to build the regular expression for emphasis.
This is a list with five entries. Terminology: In an emphasis string This is a list with five entries. Terminology: In an emphasis string
@ -4066,16 +4069,7 @@ body-regexp A regexp like \".\" to match a body character. Don't use
non-shy groups here, and don't allow newline here. non-shy groups here, and don't allow newline here.
newline The maximum number of newlines allowed in an emphasis exp. newline The maximum number of newlines allowed in an emphasis exp.
Use customize to modify this, or restart Emacs after changing it." You need to reload Org or to restart Emacs after customizing this.")
:group 'org-appearance
:set 'org-set-emph-re
:type '(list
(sexp :tag "Allowed chars in pre ")
(sexp :tag "Allowed chars in post ")
(sexp :tag "Forbidden chars in border ")
(sexp :tag "Regexp for body ")
(integer :tag "number of newlines allowed")
(option (boolean :tag "Please ignore this button"))))
(defcustom org-emphasis-alist (defcustom org-emphasis-alist
`(("*" bold) `(("*" bold)