# HG changeset patch
# User Chong Yidong <cyd@stupidchicken.com>
# Date 1229757632 0
# Node ID 8f585a03d4d45c4ff121fb3441c411fb957d0de4
# Parent  9617ff353b8f7180903a7e8eeea54f5a5d5c26b6
(mode-line-eol-desc): Use assoc to query mode-line-eol-desc-cache.

diff -r 9617ff353b8f -r 8f585a03d4d4 lisp/bindings.el
--- 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.