mirror of
https://git.savannah.gnu.org/git/emacs/org-mode.git
synced 2024-09-22 10:10:42 +00:00
Merge branch 'master' of orgmode.org:org-mode
This commit is contained in:
commit
ae02e3f333
|
@ -240,7 +240,8 @@ positions, and the definition, when inlined."
|
||||||
(list label beg end
|
(list label beg end
|
||||||
;; Definition: ensure this is an inline footnote first.
|
;; Definition: ensure this is an inline footnote first.
|
||||||
(and (or (not label) (match-string 1))
|
(and (or (not label) (match-string 1))
|
||||||
(org-trim (buffer-substring (match-end 0) (1- end)))))))))
|
(org-trim (buffer-substring-no-properties
|
||||||
|
(match-end 0) (1- end)))))))))
|
||||||
|
|
||||||
(defun org-footnote-at-definition-p ()
|
(defun org-footnote-at-definition-p ()
|
||||||
"Is the cursor at a footnote definition?
|
"Is the cursor at a footnote definition?
|
||||||
|
@ -275,7 +276,8 @@ label, start, end and definition of the footnote otherwise."
|
||||||
bound 'move)
|
bound 'move)
|
||||||
(progn (skip-chars-forward " \t\n") (point-at-bol)))
|
(progn (skip-chars-forward " \t\n") (point-at-bol)))
|
||||||
(point))))
|
(point))))
|
||||||
(org-trim (buffer-substring (match-end 0) (point)))))))))
|
(org-trim (buffer-substring-no-properties
|
||||||
|
(match-end 0) (point)))))))))
|
||||||
|
|
||||||
(defun org-footnote-get-next-reference (&optional label backward limit)
|
(defun org-footnote-get-next-reference (&optional label backward limit)
|
||||||
"Return complete reference of the next footnote.
|
"Return complete reference of the next footnote.
|
||||||
|
|
Loading…
Reference in a new issue