forked from mirrors/org-mode
Silence byte-compiler
* lisp/org-faces.el (org-src-block-faces): Move it from here... * lisp/org-src.el (org-src-block-faces): ... to here.
This commit is contained in:
parent
5bc8492388
commit
eb3dd6186d
|
@ -400,28 +400,6 @@ See also `org-fontify-quote-and-verse-blocks'."
|
|||
:group 'org-faces
|
||||
:version "25.2")
|
||||
|
||||
(defcustom org-src-block-faces nil
|
||||
"Alist of faces to be used for source-block.
|
||||
Each element is a cell of the format
|
||||
|
||||
(\"language\" FACE)
|
||||
|
||||
Where FACE is either a defined face or an anonymous face.
|
||||
|
||||
For instance, the following value would color the background of
|
||||
emacs-lisp source blocks and python source blocks in purple and
|
||||
green, respectability.
|
||||
|
||||
\\='((\"emacs-lisp\" (:background \"#EEE2FF\"))
|
||||
(\"python\" (:background \"#e5ffb8\")))"
|
||||
:group 'org-faces
|
||||
:type '(repeat (list (string :tag "language")
|
||||
(choice
|
||||
(face :tag "Face")
|
||||
(sexp :tag "Anonymous face"))))
|
||||
:version "25.2"
|
||||
:package-version '(Org . "9.0"))
|
||||
|
||||
(defface org-block-begin-line '((t (:inherit org-meta-line)))
|
||||
"Face used for the line delimiting the begin of source blocks."
|
||||
:group 'org-faces)
|
||||
|
|
|
@ -193,6 +193,28 @@ For example, there is no ocaml-mode in Emacs, but the mode to use is
|
|||
(string "Language name")
|
||||
(symbol "Major mode"))))
|
||||
|
||||
(defcustom org-src-block-faces nil
|
||||
"Alist of faces to be used for source-block.
|
||||
Each element is a cell of the format
|
||||
|
||||
(\"language\" FACE)
|
||||
|
||||
Where FACE is either a defined face or an anonymous face.
|
||||
|
||||
For instance, the following value would color the background of
|
||||
emacs-lisp source blocks and python source blocks in purple and
|
||||
green, respectability.
|
||||
|
||||
\\='((\"emacs-lisp\" (:background \"#EEE2FF\"))
|
||||
(\"python\" (:background \"#e5ffb8\")))"
|
||||
:group 'org-edit-structure
|
||||
:type '(repeat (list (string :tag "language")
|
||||
(choice
|
||||
(face :tag "Face")
|
||||
(sexp :tag "Anonymous face"))))
|
||||
:version "25.2"
|
||||
:package-version '(Org . "9.0"))
|
||||
|
||||
(defcustom org-src-tab-acts-natively nil
|
||||
"If non-nil, the effect of TAB in a code block is as if it were
|
||||
issued in the language major mode buffer."
|
||||
|
|
|
@ -156,6 +156,8 @@ Stars are put in group 1 and the trimmed body in group 2.")
|
|||
(declare-function org-table-beginning-of-field "org-table" (&optional n))
|
||||
(declare-function org-table-blank-field "org-table" ())
|
||||
(declare-function org-table-calc-current-TBLFM "org-table" (&optional arg))
|
||||
(declare-function org-table-copy-region "org-table" (beg end &optional cut))
|
||||
(declare-function org-table-cut-region "org-table" (beg end))
|
||||
(declare-function org-table-edit-field "org-table" (arg))
|
||||
(declare-function org-table-end "org-table" (&optional table-type))
|
||||
(declare-function org-table-end-of-field "org-table" (&optional n))
|
||||
|
|
Loading…
Reference in a new issue