BackgroundQueueProcessingJob.st
changeset 3048 ee0259ea01c5
parent 2913 e7c9fce5bd3a
child 3225 a10937a309bb
--- a/BackgroundQueueProcessingJob.st	Wed Jul 10 10:22:50 2013 +0200
+++ b/BackgroundQueueProcessingJob.st	Wed Jul 10 13:51:22 2013 +0200
@@ -171,7 +171,7 @@
     [
         item := cookie.
         queueAccessLock critical:[
-            queue isEmpty ifFalse:[item := queue removeFirst]
+            queue notEmpty ifTrue:[item := queue removeFirst]
         ].
         item ~~ cookie ifTrue:[
             self processItem: item
@@ -243,14 +243,14 @@
 !BackgroundQueueProcessingJob class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic2/BackgroundQueueProcessingJob.st,v 1.14 2013-03-12 11:15:55 vrany Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic2/BackgroundQueueProcessingJob.st,v 1.15 2013-07-10 11:51:22 cg Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libbasic2/BackgroundQueueProcessingJob.st,v 1.14 2013-03-12 11:15:55 vrany Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic2/BackgroundQueueProcessingJob.st,v 1.15 2013-07-10 11:51:22 cg Exp $'
 !
 
 version_SVN
-    ^ '§Id§'
+    ^ '$Id: BackgroundQueueProcessingJob.st,v 1.15 2013-07-10 11:51:22 cg Exp $'
 ! !