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.