# HG changeset patch # User Karl Heuer # Date 820797319 0 # Node ID 8fd57aba5a76302278a52fec10677175211edd74 # Parent 90c87743d3baa82206a18c3637a02ce97a37fd2c (te-process-output): Fix local var misspelling. diff -r 90c87743d3ba -r 8fd57aba5a76 lisp/terminal.el --- a/lisp/terminal.el Thu Jan 04 23:14:33 1996 +0000 +++ b/lisp/terminal.el Thu Jan 04 23:15:19 1996 +0000 @@ -865,9 +865,9 @@ ;; (A version of the following comment which might be distractingly offensive ;; to some readers has been moved to term-nasty.el.) ;; unix lacks ITS-style tty control... -(defun te-process-output (preemptable) +(defun te-process-output (preemptible) ;;>> There seems no good reason to ever disallow preemption - (setq preemptable t) + (setq preemptible t) (catch 'te-process-output (let ((buffer-read-only nil) (string nil) ostring start char (matchpos nil)) @@ -955,9 +955,9 @@ (?\C-i . te-output-tab)))) 'te-losing-unix))) (te-redisplay-if-necessary 1)) - (and preemptable + (and preemptible (input-pending-p) - ;; preemptable output! Oh my!! + ;; preemptible output! Oh my!! (throw 'te-process-output t))))) ;; We must update window-point in every window displaying our buffer (let* ((s (selected-window))