ndwarshuis
/
org-mode
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

Place Footnotes section before signature in all message-mode derived modes. 

* org-footnote.el (org-footnote-create-definition): Place Footnotes
  section before message-signature-separator also in modes derived
  from message-mode.
This commit is contained in:
Tassilo Horn 2010-12-07 23:40:22 +00:00 committed by Carsten Dominik
parent 3c7dd8487d
commit 21d4acf035
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
lisp/org-footnote.el
View File

@ -303,7 +303,7 @@ or new, let the user edit the definition of the footnote."
(t (t
(setq re (concat "^" org-footnote-tag-for-non-org-mode-files "[ \t]*$")) (setq re (concat "^" org-footnote-tag-for-non-org-mode-files "[ \t]*$"))
(unless (re-search-forward re nil t) (unless (re-search-forward re nil t)
(let ((max (if (and (eq major-mode 'message-mode) (let ((max (if (and (derived-mode-p 'message-mode)
(re-search-forward message-signature-separator nil t)) (re-search-forward message-signature-separator nil t))
(progn (beginning-of-line) (point)) (progn (beginning-of-line) (point))
(goto-char (point-max))))) (goto-char (point-max)))))