From: Stefan Monnier Date: Tue, 20 Jan 2004 21:19:33 +0000 (+0000) Subject: (wait_reading_process_input): Lisp_Object/int mixup. X-Git-Tag: ttn-vms-21-2-B4~7886 X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=9076a823112d9decd0343cb2265eae8bb9c4c50f;p=emacs.git (wait_reading_process_input): Lisp_Object/int mixup. --- diff --git a/src/ChangeLog b/src/ChangeLog index c4db25cb2d9..9331c2365ba 100644 --- a/src/ChangeLog +++ b/src/ChangeLog @@ -1,3 +1,9 @@ +2004-01-20 Stefan Monnier + + * process.c (wait_reading_process_input): Lisp_Object/int mixup. + + * dired.c (Ffile_attributes): Lisp_Object/int mixup. + 2004-01-19 Kenichi Handa * fontset.c (fontset_font_pattern): Fix previous change. diff --git a/src/process.c b/src/process.c index 315b31b728f..854607a2230 100644 --- a/src/process.c +++ b/src/process.c @@ -1,6 +1,6 @@ /* Asynchronous subprocess control for GNU Emacs. Copyright (C) 1985, 86, 87, 88, 93, 94, 95, 96, 98, 1999, - 2001, 2002, 2003 Free Software Foundation, Inc. + 2001, 2002, 2003, 2004 Free Software Foundation, Inc. This file is part of GNU Emacs. @@ -4296,7 +4296,7 @@ wait_reading_process_input (time_limit, microsecs, read_kbd, do_display) proc = chan_process[channel]; if (NILP (proc)) continue; - if (XPROCESS (proc)->read_output_delay > 0) + if (XINT (XPROCESS (proc)->read_output_delay) > 0) { check_delay--; if (NILP (XPROCESS (proc)->read_output_skip))