Mercurial Mercurial > hg > stx-libview / changeset
summary | shortlog | changelog | graph | tags | bookmarks | branches | files | changeset | raw | zip | gz | bz2 | help
Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
class: DeviceWorkstation
authorClaus Gittinger <cg@exept.de>
Sat, 01 Mar 2014 00:34:14 +0100
changeset 6295 99ef0906b963
parent 6294 55a1757ee198
child 6296 b9268ff17958
class: DeviceWorkstation changed: #dispatchLoop
DeviceWorkstation.st file | annotate | diff | comparison | revisions 
--- a/DeviceWorkstation.st	Sat Mar 01 00:24:27 2014 +0100
+++ b/DeviceWorkstation.st	Sat Mar 01 00:34:14 2014 +0100
@@ -4723,7 +4723,8 @@
                             'DeviceWorkstation [info]: sema missed' infoPrintCR
                         ].
                     ].
-                ]
+                ].
+                dispatching ifFalse:[^ self].
             ].
             dispatching ifTrue:[
                 self dispatchPendingEvents.
@@ -8313,11 +8314,11 @@
 !DeviceWorkstation class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libview/DeviceWorkstation.st,v 1.603 2014-02-28 23:24:17 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libview/DeviceWorkstation.st,v 1.604 2014-02-28 23:34:14 cg Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libview/DeviceWorkstation.st,v 1.603 2014-02-28 23:24:17 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libview/DeviceWorkstation.st,v 1.604 2014-02-28 23:34:14 cg Exp $'
 ! !
hg/stx-libview