From b1fccf5cabd3e4f190647a4daa2d525e674e4dca Mon Sep 17 00:00:00 2001 From: Jason Blevins Date: Mon, 11 Dec 2017 13:56:17 -0500 Subject: [PATCH] Define markdown--syntax-properties before use Fix byte compiler warning. --- markdown-mode.el | 58 ++++++++++++++++++++++++++++---------------------------- 1 file changed, 29 insertions(+), 29 deletions(-) diff --git a/markdown-mode.el b/markdown-mode.el index 4d0908e..81dfa9a 100644 --- a/markdown-mode.el +++ b/markdown-mode.el @@ -965,6 +965,35 @@ Group 3 matches all attributes and whitespace following the tag name.") ;;; Syntax ==================================================================== +(defvar markdown--syntax-properties + (list 'markdown-tilde-fence-begin nil + 'markdown-tilde-fence-end nil + 'markdown-fenced-code nil + 'markdown-yaml-metadata-begin nil + 'markdown-yaml-metadata-end nil + 'markdown-yaml-metadata-section nil + 'markdown-gfm-block-begin nil + 'markdown-gfm-block-end nil + 'markdown-gfm-code nil + 'markdown-list-item nil + 'markdown-pre nil + 'markdown-blockquote nil + 'markdown-hr nil + 'markdown-comment nil + 'markdown-heading nil + 'markdown-heading-1-setext nil + 'markdown-heading-2-setext nil + 'markdown-heading-1-atx nil + 'markdown-heading-2-atx nil + 'markdown-heading-3-atx nil + 'markdown-heading-4-atx nil + 'markdown-heading-5-atx nil + 'markdown-heading-6-atx nil + 'markdown-metadata-key nil + 'markdown-metadata-value nil + 'markdown-metadata-markup nil) + "Property list of all Markdown syntactic properties.") + (defsubst markdown-in-comment-p (&optional pos) "Return non-nil if POS is in a comment. If POS is not given, use point instead." @@ -1576,35 +1605,6 @@ region of a YAML metadata block as propertized by ;; Nothing found (t nil)))) -(defvar markdown--syntax-properties - (list 'markdown-tilde-fence-begin nil - 'markdown-tilde-fence-end nil - 'markdown-fenced-code nil - 'markdown-yaml-metadata-begin nil - 'markdown-yaml-metadata-end nil - 'markdown-yaml-metadata-section nil - 'markdown-gfm-block-begin nil - 'markdown-gfm-block-end nil - 'markdown-gfm-code nil - 'markdown-list-item nil - 'markdown-pre nil - 'markdown-blockquote nil - 'markdown-hr nil - 'markdown-comment nil - 'markdown-heading nil - 'markdown-heading-1-setext nil - 'markdown-heading-2-setext nil - 'markdown-heading-1-atx nil - 'markdown-heading-2-atx nil - 'markdown-heading-3-atx nil - 'markdown-heading-4-atx nil - 'markdown-heading-5-atx nil - 'markdown-heading-6-atx nil - 'markdown-metadata-key nil - 'markdown-metadata-value nil - 'markdown-metadata-markup nil) - "Property list of all Markdown syntactic properties.") - (defun markdown-syntax-propertize (start end) "Function used as `syntax-propertize-function'. START and END delimit region to propertize." -- 2.11.4.GIT