# HG changeset patch
# User Richard M. Stallman <rms@gnu.org>
# Date 1064925518 0
# Node ID 2036a4307b6c1a7a062528d70c5b8714adaf3443
# Parent  3614833210ba798ae96ea46b4bb3e4b6f7f2ac61
(set_tty_color_mode): Calculate current_mode_spec regardless of value of VAL.

diff -r 3614833210ba -r 2036a4307b6c src/term.c
--- a/src/term.c	Tue Sep 30 12:36:17 2003 +0000
+++ b/src/term.c	Tue Sep 30 12:38:38 2003 +0000
@@ -2120,13 +2120,15 @@
 	color_mode_spec = Qnil;
       else
 	color_mode_spec = Fassq (val, XSYMBOL (tty_color_mode_alist)->value);
-      current_mode_spec = assq_no_quit (Qtty_color_mode, f->param_alist);
 
       if (CONSP (color_mode_spec))
 	color_mode = XCDR (color_mode_spec);
       else
 	color_mode = Qnil;
     }
+
+  current_mode_spec = assq_no_quit (Qtty_color_mode, f->param_alist);
+
   if (CONSP (current_mode_spec))
     current_mode = XCDR (current_mode_spec);
   else