Function: footnote--insert-numbered-footnote

footnote--insert-numbered-footnote is a byte-compiled function defined in footnote.el.gz.

Signature

(footnote--insert-numbered-footnote ARG &optional MOUSABLE)

Documentation

Insert numbered footnote at point.

Return a marker pointing to the beginning of the [...].

Source Code

;; Defined in /usr/src/emacs/lisp/mail/footnote.el.gz
;; Internal functions
(defun footnote--insert-numbered-footnote (arg &optional mousable)
  "Insert numbered footnote at point.
Return a marker pointing to the beginning of the [...]."
  (let ((string (concat footnote-start-tag
			(footnote--index-to-string arg)
			footnote-end-tag))
        (pos (point)))
    (insert
     (if mousable
	 (propertize
	  string 'footnote-number arg footnote-mouse-highlight t)
       (propertize string 'footnote-number arg)))
    (copy-marker pos t)))