|
@@ -281,10 +281,10 @@ otherwise."
|
|
(save-excursion (goto-char (org-element-property :end context))
|
|
(save-excursion (goto-char (org-element-property :end context))
|
|
(skip-chars-backward " \r\t\n")
|
|
(skip-chars-backward " \r\t\n")
|
|
(if (eq (org-element-class context) 'object) (point)
|
|
(if (eq (org-element-class context) 'object) (point)
|
|
- (1+ (line-beginning-position 2))))))
|
|
|
|
|
|
+ (line-beginning-position 2)))))
|
|
;; At the beginning of a footnote definition, right after the
|
|
;; At the beginning of a footnote definition, right after the
|
|
;; label, is OK.
|
|
;; label, is OK.
|
|
- ((eq type 'footnote-definition) (looking-at (rx (or space buffer-end))))
|
|
|
|
|
|
+ ((eq type 'footnote-definition) (looking-at (rx space)))
|
|
;; Other elements are invalid.
|
|
;; Other elements are invalid.
|
|
((eq (org-element-class context) 'element) nil)
|
|
((eq (org-element-class context) 'element) nil)
|
|
;; Just before object is fine.
|
|
;; Just before object is fine.
|