Tools__BackgroundSourceProcessingService.st
changeset 11558 0e93cd2b9c48
parent 11183 a0ab27f5679c
child 11618 29842c419b87
--- a/Tools__BackgroundSourceProcessingService.st	Tue Jun 05 23:48:53 2012 +0200
+++ b/Tools__BackgroundSourceProcessingService.st	Tue Jun 05 23:59:55 2012 +0200
@@ -133,13 +133,13 @@
     "(Re)starts the processing job. Should be called whenever a source 
      must be (re)processed."
 
-    | prio |
+    | prio browser |
 
     "/ this clobbers the codeViews modified state; therefore, we have to remember
     "/ this info somewhere ...
-    codeView browser ifNotNil:[
+    (browser := codeView browser) notNil ifTrue:[
         textView modified ifTrue:[
-            codeView browser navigationState realModifiedState: true
+            browser navigationState realModifiedState: true
         ].
         textView modifiedChannel setValue:false.
     ].
@@ -148,20 +148,15 @@
         job running ifFalse:[
             "/ process already created, but did not get a change to start yet;
             ^ self
-        ] ifTrue:[
-            job stop.
-        ]
+        ].
+        job stop.
     ].
-    prio := Processor userBackgroundPriority - 1.
-    textView shown ifFalse:[
-        prio := prio - 1 max:1
-    ].
-
+    prio := Processor userBackgroundPriority.
     job startWithPriority: prio.
 
     "Modified: / 07-07-2011 / 12:26:12 / Jan Vrany <jan.vrant@fit.cvut,cz>"
-    "Modified: / 26-09-2011 / 15:40:23 / cg"
     "Created: / 24-01-2012 / 12:15:08 / Jan Vrany <jan.vrany@fit.cvut.cz>"
+    "Modified: / 05-06-2012 / 23:58:20 / cg"
 !
 
 process: delayed
@@ -187,9 +182,9 @@
 !BackgroundSourceProcessingService class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/Tools__BackgroundSourceProcessingService.st,v 1.1 2012-01-24 12:57:30 vrany Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/Tools__BackgroundSourceProcessingService.st,v 1.2 2012-06-05 21:59:55 cg Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libtool/Tools__BackgroundSourceProcessingService.st,v 1.1 2012-01-24 12:57:30 vrany Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/Tools__BackgroundSourceProcessingService.st,v 1.2 2012-06-05 21:59:55 cg Exp $'
 ! !