]> git.eshelyaron.com Git - emacs.git/commit
* lisp/mail/footnote.el: Add TEXT and POINTERS together
authorStefan Monnier <monnier@iro.umontreal.ca>
Thu, 2 May 2019 15:00:20 +0000 (11:00 -0400)
committerStefan Monnier <monnier@iro.umontreal.ca>
Thu, 2 May 2019 15:00:20 +0000 (11:00 -0400)
commit17a722982cca4e8e643c7a9102903e820e784cc6
treeb51f9ab4880001e15f024e32547d4573bdf5f316
parent39acaff574140b67ef5311c5764a6b3b29491991
* lisp/mail/footnote.el: Add TEXT and POINTERS together

Rather than adding POINTERS and TEXT separately to footnote--markers-alist,
add them together, so we don't need footnote--first-text-marker because
the TEXT part is never nil.

(footnote--insert-numbered-footnote): Return marker.
(footnote--insert-text-marker, footnote--insert-pointer-marker):
Delete functions.
(footnote--insert-markers): New function to replace them.
(footnote--insert-footnote): Adjust accordingly.
Simplify pointless `unless`.
(footnote--first-text-marker): Remove.  Replace all calls by
(cadr (car footnote--markers-alist)) or just footnote--markers-alist.
lisp/mail/footnote.el