Mercurial > emacs
diff src/callproc.c @ 90434:8c71fed372cf
(Fcall_process): Sync with HEAD.
| author | Kenichi Handa <handa@m17n.org> |
|---|---|
| date | Thu, 08 Jun 2006 07:08:36 +0000 |
| parents | 6592da24d351 |
| children | 138027c8c982 |
line wrap: on
line diff
--- a/src/callproc.c Thu Jun 08 06:54:41 2006 +0000 +++ b/src/callproc.c Thu Jun 08 07:08:36 2006 +0000 @@ -269,6 +269,7 @@ if (nargs >= 5) { int must_encode = 0; + Lisp_Object coding_attrs; for (i = 4; i < nargs; i++) CHECK_STRING (args[i]); @@ -296,6 +297,13 @@ } val = coding_inherit_eol_type (val, Qnil); setup_coding_system (Fcheck_coding_system (val), &argument_coding); + coding_attrs = CODING_ID_ATTRS (argument_coding.id); + if (NILP (CODING_ATTR_ASCII_COMPAT (coding_attrs))) + { + /* We should not use an ASCII incompatible coding system. */ + val = raw_text_coding_system (val); + setup_coding_system (val, &argument_coding); + } } }