diff options
author | Nicolas Goaziou <n.goaziou@gmail.com> | 2011-08-06 11:34:54 +0200 |
---|---|---|
committer | Nicolas Goaziou <n.goaziou@gmail.com> | 2011-08-06 11:56:14 +0200 |
commit | a41541c033008336001d6f01b45e85502e04ecff (patch) | |
tree | 3ce39b4ffe7d8d6921efe9ae96180a754a90ba7c | |
parent | d3b088e017763a78e2928f6533171de130bd6dcf (diff) | |
download | org-mode-a41541c033008336001d6f01b45e85502e04ecff.tar.gz |
org-footnote: remove an unused variable
* lisp/org-footnote.el (org-footnote-label-history): removed variable
(org-footnote-new): remove call to that variable.
-rw-r--r-- | lisp/org-footnote.el | 7 |
1 files changed, 1 insertions, 6 deletions
diff --git a/lisp/org-footnote.el b/lisp/org-footnote.el index 68b1412..4e1f7a1 100644 --- a/lisp/org-footnote.el +++ b/lisp/org-footnote.el @@ -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:: ]") |