diff options
| author | Richard M. Stallman | 1997-08-26 06:29:12 +0000 |
|---|---|---|
| committer | Richard M. Stallman | 1997-08-26 06:29:12 +0000 |
| commit | 8520b9bf5557c4f8d5a0106f3122fe056e20dd88 (patch) | |
| tree | 0a0ef370d0d31fc7e7e4a56dc82617363e6e38c0 /lisp | |
| parent | e823bfa3adeb847782d99a5b2300f433c4468f8e (diff) | |
| download | emacs-8520b9bf5557c4f8d5a0106f3122fe056e20dd88.tar.gz emacs-8520b9bf5557c4f8d5a0106f3122fe056e20dd88.zip | |
(gnus-emphasis-alist): Don't use caddr.
Diffstat (limited to 'lisp')
| -rw-r--r-- | lisp/gnus/gnus-art.el | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/gnus/gnus-art.el b/lisp/gnus/gnus-art.el index 239d6f23043..5430fd7afb5 100644 --- a/lisp/gnus/gnus-art.el +++ b/lisp/gnus/gnus-art.el | |||
| @@ -191,7 +191,7 @@ asynchronously. The compressed face will be piped to this command." | |||
| 191 | (lambda (spec) | 191 | (lambda (spec) |
| 192 | (list | 192 | (list |
| 193 | (format format (car spec) (cadr spec)) | 193 | (format format (car spec) (cadr spec)) |
| 194 | 2 3 (intern (format "gnus-emphasis-%s" (caddr spec))))) | 194 | 2 3 (intern (format "gnus-emphasis-%s" (car (cddr spec)))))) |
| 195 | types))) | 195 | types))) |
| 196 | "Alist that says how to fontify certain phrases. | 196 | "Alist that says how to fontify certain phrases. |
| 197 | Each item looks like this: | 197 | Each item looks like this: |