[Emacs-diffs] emacs/lisp ChangeLog ansi-color.el

[Glenn Morris]

CVSROOT:        /sources/emacs
Module name:    emacs
Changes by:     Glenn Morris <gm>       09/09/17 06:20:00

Modified files:
        lisp           : ChangeLog ansi-color.el 

Log message:
        (ansi-color-get-face-1): Fix typo in handler.

CVSWeb URLs:
http://cvs.savannah.gnu.org/viewcvs/emacs/lisp/ChangeLog?cvsroot=emacs&r1=1.16187&r2=1.16188
http://cvs.savannah.gnu.org/viewcvs/emacs/lisp/ansi-color.el?cvsroot=emacs&r1=1.31&r2=1.32

Patches:
Index: ChangeLog
===================================================================
RCS file: /sources/emacs/emacs/lisp/ChangeLog,v
retrieving revision 1.16187
retrieving revision 1.16188
diff -u -b -r1.16187 -r1.16188
--- ChangeLog   17 Sep 2009 06:02:20 -0000      1.16187
+++ ChangeLog   17 Sep 2009 06:19:57 -0000      1.16188
@@ -1,5 +1,7 @@
 2009-09-17  Glenn Morris  <address@hidden>
 
+       * ansi-color.el (ansi-color-get-face-1): Fix typo in handler.
+
        * simple.el (hard-newline): Give it a doc-string.
 
 2009-09-17  Dan Nicolaescu  <address@hidden>

Index: ansi-color.el
===================================================================
RCS file: /sources/emacs/emacs/lisp/ansi-color.el,v
retrieving revision 1.31
retrieving revision 1.32
diff -u -b -r1.31 -r1.32
--- ansi-color.el       28 Apr 2009 04:02:57 -0000      1.31
+++ ansi-color.el       17 Sep 2009 06:20:00 -0000      1.32
@@ -604,7 +604,7 @@
 ANSI-CODE is used as an index into the vector."
   (condition-case nil
       (aref ansi-color-map ansi-code)
-    ('args-out-of-range nil)))
+    (args-out-of-range nil)))
 
 (defun ansi-color-get-face (escape-seq)
   "Create a new face by applying all the parameters in ESCAPE-SEQ.