Mercurial > emacs
changeset 86228:8e5b337fea59
* 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.
| author | Stefan Monnier <monnier@iro.umontreal.ca> |
|---|---|
| date | Mon, 19 Nov 2007 07:40:51 +0000 |
| parents | 5931e03fc5d5 |
| children | 0ec5ce87b9e0 |
| files | src/ChangeLog src/coding.c src/fns.c |
| diffstat | 3 files changed, 9 insertions(+), 3 deletions(-) [+] |
line wrap: on
line diff
--- 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 <monnier@iro.umontreal.ca> + + * 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 <jan.h.d@swipnet.se> * sysdep.c (init_system_name): Use getaddrinfo if available.
--- 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])
--- 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; }