[Emacs-diffs] emacs/lisp bindings.el

[Chong Yidong]

CVSROOT:        /sources/emacs
Module name:    emacs
Changes by:     Chong Yidong <cyd>      08/12/20 07:20:33

Modified files:
        lisp           : bindings.el 

Log message:
        (mode-line-eol-desc): Use assoc to query mode-line-eol-desc-cache.

CVSWeb URLs:
http://cvs.savannah.gnu.org/viewcvs/emacs/lisp/bindings.el?cvsroot=emacs&r1=1.213&r2=1.214

Patches:
Index: bindings.el
===================================================================
RCS file: /sources/emacs/emacs/lisp/bindings.el,v
retrieving revision 1.213
retrieving revision 1.214
diff -u -b -r1.213 -r1.214
--- bindings.el 29 Aug 2008 17:56:33 -0000      1.213
+++ bindings.el 20 Dec 2008 07:20:32 -0000      1.214
@@ -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.