(te-process-output): Fix local var misspelling.

1 files changed, 4 insertions, 4 deletions

diff --git a/lisp/terminal.el b/lisp/terminal.el
index 6ca1efd98ba..6ce68242810 100644
--- a/lisp/terminal.el
+++ b/lisp/terminal.el
@@ -865,9 +865,9 @@ move to start of new line, clear to end of line."
 ;; (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 @@ move to start of new line, clear to end of line."
                                  (?\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))