Index: /trunk/source/cocoa-ide/cocoa-listener.lisp
===================================================================
--- /trunk/source/cocoa-ide/cocoa-listener.lisp	(revision 15182)
+++ /trunk/source/cocoa-ide/cocoa-listener.lisp	(revision 15183)
@@ -766,5 +766,5 @@
       (unless (deferred-cocoa-listener-stream-info-window info)
         (with-autorelease-pool
-            (let* ((doc (make-instance 'hemlock-background-listener-document))
+            (let* ((doc (execute-in-gui (lambda () (make-instance 'hemlock-background-listener-document))))
                    (buffer (hemlock-buffer doc))
                    (process (deferred-cocoa-listener-stream-info-process info)))
