From 0d4883f7dee7968e91d7c87fcab1957afec87afd Mon Sep 17 00:00:00 2001 From: Carsten Dominik Date: Tue, 27 Apr 2010 08:11:03 +0200 Subject: [PATCH] Fix typos and add customization group for footnotes Patch by Michael Fornius --- lisp/ChangeLog | 4 ++++ lisp/org-footnote.el | 9 +++++++-- 2 files changed, 11 insertions(+), 2 deletions(-) diff --git a/lisp/ChangeLog b/lisp/ChangeLog index c7c4c0966..181143e07 100755 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -1,5 +1,9 @@ 2010-04-27 Carsten Dominik + * org-footnote.el (org-footnote): New group. + (org-footnote-section) + (org-footnote-tag-for-non-org-mode-files): Fix typos. + * org-list.el (org-end-of-item-text-before-children): Also do the right thing at the end of a file. diff --git a/lisp/org-footnote.el b/lisp/org-footnote.el index 84cd7b313..0f7168b30 100644 --- a/lisp/org-footnote.el +++ b/lisp/org-footnote.el @@ -65,6 +65,11 @@ (org-re "^\\(\\[\\([0-9]+\\|fn:[-_[:word:]]+\\)\\]\\)") "Regular expression matching the definition of a footnote.") +(defgroup org-footnote nil + "Footnotes in Org-mode." + :tag "Org Footnote" + :group 'org) + (defcustom org-footnote-section "Footnotes" "Outline heading containing footnote definitions before export. This can be nil, to place footnotes locally at the end of the current @@ -75,7 +80,7 @@ automatically, i.e. when creating the footnote, and when sorting the notes. However, by hand you may place definitions *anywhere*. If this is a string, during export, all subtrees starting with this heading will be removed after extracting footnote definitions." - :group 'org-footnotes + :group 'org-footnote :type '(choice (string :tag "Collect footnotes under heading") (const :tag "Define footnotes locally" nil))) @@ -87,7 +92,7 @@ as in Org-mode. Outside Org-mode, new footnotes are always placed at the end of the file. When you normalize the notes, any line containing only this tag will be removed, a new one will be inserted at the end of the file, followed by the collected and normalized footnotes." - :group 'org-footnotes + :group 'org-footnote :type 'string) (defcustom org-footnote-define-inline nil