Remove without-interrupts from runtime/x11graph.scm.

Replaced it with without-interruption.  Presumably the desire was to
keep the permanently registered IO thread event from interrupting
itself.

diff --git a/src/runtime/x11graph.scm b/src/runtime/x11graph.scm
index be741ce99a13f1d63877ca0656ee7fbac2affbd2..8db486d6b334c923067c0044b7d7f506836812e6 100644 (file)
--- a/src/runtime/x11graph.scm
+++ b/src/runtime/x11graph.scm
@@ -261,7 +261,7 @@ USA.
            display)))))
 
 (define (x-graphics/close-display display)
-  (without-interrupts
+  (without-interruption
    (lambda ()
      (if (x-display/xd display)
         (begin
@@ -341,7 +341,7 @@ USA.
     (with-thread-events-blocked loop)))
 \f
 (define (process-event display event)
-  (without-interrupts
+  (without-interruption
    (lambda ()
      (let ((window
            (search-gc-finalizer (x-display/window-finalizer display)
@@ -446,7 +446,7 @@ USA.
   (if (x-graphics-device/xw device) #t #f))
 
 (define (x-graphics/close-window device)
-  (without-interrupts
+  (without-interruption
    (lambda ()
      (close-x-window (graphics-device/descriptor device)))))