(read_process_output): Fix mixing of Lisp_Object and

int.

1 files changed, 2 insertions, 2 deletions

diff --git a/src/process.c b/src/process.c
index daa4e391744..0f1f702a348 100644
--- a/src/process.c
+++ b/src/process.c
@@ -2828,11 +2828,11 @@ read_process_output (proc, channel)
              valid memory because p->outfd will be changed once EOF is
              sent to the process.  */
           if (NILP (p->encode_coding_system)
-              && proc_encode_coding_system[p->outfd])
+              && proc_encode_coding_system[XINT (p->outfd)])
             {
               p->encode_coding_system = coding->symbol;
               setup_coding_system (coding->symbol,
-                                   proc_encode_coding_system[p->outfd]);
+                                   proc_encode_coding_system[XINT (p->outfd)]);
             }
         }