tec/org-mode
tec/org-mode
1
0
Fork 0
forked from mirrors/org-mode
Code Pull requests Releases Activity

Merge branch 'hotfix-7.8.06'

Browse source
This commit is contained in:
Nicolas Goaziou 2012-03-24 20:35:31 +01:00
parent ac24a454ac 6ad53828cc
commit 6427c6aeaa
1 changed files with 3 additions and 2 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

5
lisp/org-footnote.el
View file

@ -865,8 +865,9 @@ Return the number of footnotes removed."
(ndef 0)) (ndef 0))
(while (re-search-forward def-re nil t) (while (re-search-forward def-re nil t)
(let ((full-def (org-footnote-at-definition-p))) (let ((full-def (org-footnote-at-definition-p)))
(delete-region (nth 1 full-def) (nth 2 full-def))) (when full-def
(incf ndef)) (delete-region (nth 1 full-def) (nth 2 full-def))
(incf ndef))))
ndef))) ndef)))
(defun org-footnote-delete (&optional label) (defun org-footnote-delete (&optional label)