Merge branch 'bugfix' into emacs-sync

This commit is contained in:
Kyle Meyer 2022-02-20 14:03:23 -05:00
commit 28b5e6ce36
3 changed files with 10 additions and 3 deletions

View File

@ -784,8 +784,12 @@ Use \"export %s\" instead"
reports))
(defun org-lint-undefined-footnote-reference (ast)
(let ((definitions (org-element-map ast 'footnote-definition
(lambda (f) (org-element-property :label f)))))
(let ((definitions
(org-element-map ast '(footnote-definition footnote-reference)
(lambda (f)
(and (or (eq 'footnote-definition (org-element-type f))
(eq 'inline (org-element-property :type f)))
(org-element-property :label f))))))
(org-element-map ast 'footnote-reference
(lambda (f)
(let ((label (org-element-property :label f)))

View File

@ -632,7 +632,7 @@ This option can also be set with the SELECT_TAGS keyword."
(defcustom org-export-with-smart-quotes nil
"Non-nil means activate smart quotes during export.
This option can also be set with the OPTIONS keyword,
e.g., \"':t\".
e.g., \"\\=':t\".
When setting this to non-nil, you need to take care of
using the correct Babel package when exporting to LaTeX.

View File

@ -358,6 +358,9 @@ This is not a node property
(should-not
(org-test-with-temp-text "Text[fn:1:inline reference]"
(org-lint '(undefined-footnote-reference))))
(should-not
(org-test-with-temp-text "Text[fn:1:inline reference] [fn:1]"
(org-lint '(undefined-footnote-reference))))
(should-not
(org-test-with-temp-text "Text[fn::anonymous reference]"
(org-lint '(undefined-footnote-reference)))))