org-footnote: remove an unused variable

* lisp/org-footnote.el (org-footnote-label-history): removed variable
(org-footnote-new): remove call to that variable.
This commit is contained in:
Nicolas Goaziou 2011-08-06 11:34:54 +02:00
parent d3b088e017
commit a41541c033
1 changed files with 1 additions and 6 deletions

View File

@ -416,10 +416,6 @@ The returns the firsts fn:N labels that is currently not used."
(incf cnt))
(format fmt cnt)))
(defvar org-footnote-label-history nil
"History of footnote labels entered in current buffer.")
(make-variable-buffer-local 'org-footnote-label-history)
(defun org-footnote-new ()
"Insert a new footnote.
This command prompts for a label. If this is a label referencing an
@ -443,8 +439,7 @@ or new, let the user edit the definition of the footnote."
(completing-read
"Label (leave empty for anonymous): "
(mapcar 'list labels) nil nil
(if (eq org-footnote-auto-label 'confirm) propose nil)
'org-footnote-label-history))))))
(if (eq org-footnote-auto-label 'confirm) propose nil)))))))
(cond
((not label)
(insert "[fn:: ]")