# HG changeset patch
# User Stefan Monnier <monnier@iro.umontreal.ca>
# Date 1207878041 0
# Node ID ddcecf318c8a9311e5c778c01243fba3ec7e0ebf
# Parent  955774916817cf92261730e222a24966f0b3d094
(set_tty_color_mode): Left over typo.

diff -r 955774916817 -r ddcecf318c8a src/ChangeLog
--- a/src/ChangeLog	Fri Apr 11 01:10:43 2008 +0000
+++ b/src/ChangeLog	Fri Apr 11 01:40:41 2008 +0000
@@ -1,3 +1,7 @@
+2008-04-11  Stefan Monnier  <monnier@iro.umontreal.ca>
+
+	* term.c (set_tty_color_mode): Left over typo.
+
 2008-04-10  Michael Albinus  <michael.albinus@gmx.de>
 
 	* fileio.c (Fmake_symbolic_link): Surround code by #ifdef S_IFLNK
diff -r 955774916817 -r ddcecf318c8a src/term.c
--- a/src/term.c	Fri Apr 11 01:10:43 2008 +0000
+++ b/src/term.c	Fri Apr 11 01:40:41 2008 +0000
@@ -2172,7 +2172,7 @@
   Lisp_Object tty_color_mode_alist
     = Fintern_soft (build_string ("tty-color-mode-alist"), Qnil);
 
-  tem = assq_no_quit (Qtty_color_mode, XFRAME (val)->param_alist);
+  tem = assq_no_quit (Qtty_color_mode, f->param_alist);
   val = CONSP (tem) ? XCDR (tem) : Qnil;
 
   if (INTEGERP (val))