From 0fff59cd43619fcc5644501ac9df74f39d7adf67 Mon Sep 17 00:00:00 2001 From: Nicolas Goaziou Date: Sat, 1 Oct 2011 08:57:33 +0200 Subject: [PATCH] org-footnote: Small refactoring * lisp/org-footnote.el (org-footnote-renumber-fn:N): Small refactoring. --- lisp/org-footnote.el | 5 +++-- 1 file changed, 3 insertions(+), 2 deletions(-) diff --git a/lisp/org-footnote.el b/lisp/org-footnote.el index 64e7cc3fe..76e7af3a6 100644 --- a/lisp/org-footnote.el +++ b/lisp/org-footnote.el @@ -894,8 +894,9 @@ If LABEL is non-nil, delete that footnote instead." (save-excursion (goto-char (match-beginning 0)) ;; Ensure match is a footnote reference or definition. - (when (or (and (bolp) (save-match-data (org-footnote-at-definition-p))) - (save-match-data (org-footnote-at-reference-p))) + (when (save-match-data (if (bolp) + (org-footnote-at-definition-p) + (org-footnote-at-reference-p))) (let ((new-val (or (cdr (assoc (match-string 1) map)) (number-to-string (incf n))))) (unless (assoc (match-string 1) map)