Mercurial > emacs
changeset 100586:8f585a03d4d4
(mode-line-eol-desc): Use assoc to query mode-line-eol-desc-cache.
author | Chong Yidong <cyd@stupidchicken.com> |
---|---|
date | Sat, 20 Dec 2008 07:20:32 +0000 |
parents | 9617ff353b8f |
children | d91e3320dd81 |
files | lisp/bindings.el |
diffstat | 1 files changed, 1 insertions(+), 1 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/bindings.el Sat Dec 20 07:19:59 2008 +0000 +++ b/lisp/bindings.el Sat Dec 20 07:20:32 2008 +0000 @@ -146,7 +146,7 @@ (defun mode-line-eol-desc () (let* ((eol (coding-system-eol-type buffer-file-coding-system)) (mnemonic (coding-system-eol-type-mnemonic buffer-file-coding-system)) - (desc (assq eol mode-line-eol-desc-cache))) + (desc (assoc eol mode-line-eol-desc-cache))) (if (and desc (eq (cadr desc) mnemonic)) (cddr desc) (if desc (setq mode-line-eol-desc-cache nil)) ;Flush the cache if stale.