# HG changeset patch # User Stefan Monnier # Date 1195458051 0 # Node ID 8e5b337fea59204dd7b4c91f247e5899cf70335d # Parent 5931e03fc5d5f8f597653abab3e949c7c8ee3703 * coding.c (detect_coding, Fupdate_coding_systems_internal): * fns.c (Fmd5): Use find_symbol_value rather than SYMBOL_VALUE Since we do not want to see internal Lisp_*fwd objects here. diff -r 5931e03fc5d5 -r 8e5b337fea59 src/ChangeLog --- a/src/ChangeLog Mon Nov 19 07:34:18 2007 +0000 +++ b/src/ChangeLog Mon Nov 19 07:40:51 2007 +0000 @@ -1,3 +1,9 @@ +2007-11-19 Stefan Monnier + + * coding.c (detect_coding, Fupdate_coding_systems_internal): + * fns.c (Fmd5): Use find_symbol_value rather than SYMBOL_VALUE + Since we do not want to see internal Lisp_*fwd objects here. + 2007-11-18 Jan Dj,Ad(Brv * sysdep.c (init_system_name): Use getaddrinfo if available. diff -r 5931e03fc5d5 -r 8e5b337fea59 src/coding.c --- a/src/coding.c Mon Nov 19 07:34:18 2007 +0000 +++ b/src/coding.c Mon Nov 19 07:40:51 2007 +0000 @@ -4304,7 +4304,7 @@ if (! mask) idx = CODING_CATEGORY_IDX_RAW_TEXT; - val = SYMBOL_VALUE (XVECTOR (Vcoding_category_table)->contents[idx]); + val = find_symbol_value (XVECTOR (Vcoding_category_table)->contents[idx]); if (coding->eol_type != CODING_EOL_UNDECIDED) { @@ -7582,7 +7582,7 @@ { Lisp_Object val; - val = SYMBOL_VALUE (XVECTOR (Vcoding_category_table)->contents[i]); + val = find_symbol_value (XVECTOR (Vcoding_category_table)->contents[i]); if (!NILP (val)) { if (! coding_system_table[i]) diff -r 5931e03fc5d5 -r 8e5b337fea59 src/fns.c --- a/src/fns.c Mon Nov 19 07:34:18 2007 +0000 +++ b/src/fns.c Mon Nov 19 07:40:51 2007 +0000 @@ -5559,7 +5559,7 @@ if (STRING_MULTIBYTE (object)) /* use default, we can't guess correct value */ - coding_system = SYMBOL_VALUE (XCAR (Vcoding_category_list)); + coding_system = find_symbol_value (XCAR (Vcoding_category_list)); else coding_system = Qraw_text; }