From 5283252c8677dcdf95d16b1f951c495c0acf2bb5 Mon Sep 17 00:00:00 2001 From: Carsten Dominik Date: Fri, 13 Feb 2009 09:11:22 +0100 Subject: [PATCH] Sync changes from downstream Emacs Glenn Morris has fixed typos. --- lisp/org-footnote.el | 6 +++--- 1 file changed, 3 insertions(+), 3 deletions(-) diff --git a/lisp/org-footnote.el b/lisp/org-footnote.el index ed625b82c..e586fb470 100644 --- a/lisp/org-footnote.el +++ b/lisp/org-footnote.el @@ -124,7 +124,7 @@ extracted will be filled again." If yes, return the beginning position, the label, and the definition, if local." (when (org-in-regexp org-footnote-re 15) (list (match-beginning 0) - (or (match-string 1) + (or (match-string 1) (if (equal (match-string 2) "fn:") nil (match-string 2))) (match-string 4)))) @@ -133,7 +133,7 @@ If yes, return the beginning position, the label, and the definition, if local." This matches only pure definitions like [1] or [fn:name] at the beginning of a line. It does not a references like [fn:name:definition], where the footnote text is included and defined locally. -The return value will be nil if not at a foornote definition, and a list +The return value will be nil if not at a footnote definition, and a list with start and label of the footnote if there is a definition at point." (save-excursion (end-of-line 1) @@ -287,7 +287,7 @@ or new, let the user edit the definition of the footnote." ;;;###autoload (defun org-footnote-action (&optional special) "Do the right thing for footnotes. -When at a foornote reference, jump to the definition. When at a definition, +When at a footnote reference, jump to the definition. When at a definition, jump to the refernces. When neither at definition or reference, create a new footnote, interactively. With prefix arg SPECIAL, offer additional commands in a menu."