diff options
| author | Richard M. Stallman <rms@gnu.org> | 2007-12-26 23:01:34 +0000 |
|---|---|---|
| committer | Richard M. Stallman <rms@gnu.org> | 2007-12-26 23:01:34 +0000 |
| commit | f851506c8a2123a83e250e0bbea4f5cf036ec924 (patch) | |
| tree | 1e2cb5e53c46c606a9940f76155ced18bf3c97c4 | |
| parent | eaa872bb860a305fb739334951698618420147c8 (diff) | |
| download | emacs-f851506c8a2123a83e250e0bbea4f5cf036ec924.tar.gz | |
Whitespace change.
| -rw-r--r-- | lisp/mail/footnote.el | 7 |
1 files changed, 4 insertions, 3 deletions
diff --git a/lisp/mail/footnote.el b/lisp/mail/footnote.el index b94f3bc8297..a3a9cfc8058 100644 --- a/lisp/mail/footnote.el +++ b/lisp/mail/footnote.el @@ -327,7 +327,8 @@ Conversion is done based upon the current selected style." (defun Footnote-current-regexp () "Return the regexp of the index of the current style." (concat (nth 2 (or (assq footnote-style footnote-style-alist) - (nth 0 footnote-style-alist))) "*")) + (nth 0 footnote-style-alist))) + "*")) (defun Footnote-refresh-footnotes (&optional index-regexp) "Redraw all footnotes. @@ -345,7 +346,7 @@ styles." (search-backward footnote-start-tag nil t) (when (looking-at (concat (regexp-quote footnote-start-tag) - "\\(" index-regexp "\\)" + "\\(" index-regexp "+\\)" (regexp-quote footnote-end-tag))) (replace-match (concat footnote-start-tag @@ -361,7 +362,7 @@ styles." (goto-char (cdr alist)) (when (looking-at (concat (regexp-quote footnote-start-tag) - "\\(" index-regexp "\\)" + "\\(" index-regexp "+\\)" (regexp-quote footnote-end-tag))) (replace-match (concat footnote-start-tag |