diff options
| author | Chong Yidong | 2007-04-15 17:28:00 +0000 |
|---|---|---|
| committer | Chong Yidong | 2007-04-15 17:28:00 +0000 |
| commit | 04cc65dcaea6358afde239258483f511087bca92 (patch) | |
| tree | 1b95c6c12a194ce214c13ebe451c24f89eeff2cb | |
| parent | dbbab658ce8d5b47419e9f2310576ca4b687a18d (diff) | |
| download | emacs-04cc65dcaea6358afde239258483f511087bca92.tar.gz emacs-04cc65dcaea6358afde239258483f511087bca92.zip | |
(footnote-style): Clarify docstring to state that customizing this
only applies to future footnotes.
| -rw-r--r-- | lisp/mail/footnote.el | 8 |
1 files changed, 6 insertions, 2 deletions
diff --git a/lisp/mail/footnote.el b/lisp/mail/footnote.el index 9e3a375c50d..7992438df25 100644 --- a/lisp/mail/footnote.el +++ b/lisp/mail/footnote.el | |||
| @@ -294,14 +294,18 @@ See footnote-han.el, footnote-greek.el and footnote-hebrew.el for more | |||
| 294 | exciting styles.") | 294 | exciting styles.") |
| 295 | 295 | ||
| 296 | (defcustom footnote-style 'numeric | 296 | (defcustom footnote-style 'numeric |
| 297 | "*Style used for footnoting. | 297 | "*Default style used for footnoting. |
| 298 | numeric == 1, 2, 3, ... | 298 | numeric == 1, 2, 3, ... |
| 299 | english-lower == a, b, c, ... | 299 | english-lower == a, b, c, ... |
| 300 | english-upper == A, B, C, ... | 300 | english-upper == A, B, C, ... |
| 301 | roman-lower == i, ii, iii, iv, v, ... | 301 | roman-lower == i, ii, iii, iv, v, ... |
| 302 | roman-upper == I, II, III, IV, V, ... | 302 | roman-upper == I, II, III, IV, V, ... |
| 303 | latin == ¹ ² ³ º ª § ¶ | 303 | latin == ¹ ² ³ º ª § ¶ |
| 304 | See also variables `footnote-start-tag' and `footnote-end-tag'." | 304 | See also variables `footnote-start-tag' and `footnote-end-tag'. |
| 305 | |||
| 306 | Customizing this variable has no effect on buffers already | ||
| 307 | displaying footnotes. You can change the style of existing | ||
| 308 | buffers using the command `Footnote-set-style'." | ||
| 305 | :type (cons 'choice (mapcar (lambda (x) (list 'const (car x))) | 309 | :type (cons 'choice (mapcar (lambda (x) (list 'const (car x))) |
| 306 | footnote-style-alist)) | 310 | footnote-style-alist)) |
| 307 | :group 'footnote) | 311 | :group 'footnote) |