--- a/Tools__BackgroundSourceProcessingService.st Wed Feb 22 13:18:20 2012 +0000
+++ b/Tools__BackgroundSourceProcessingService.st Wed Feb 22 17:35:52 2012 +0000
@@ -92,10 +92,14 @@
textView notNil ifTrue:[
"/sender == textView modifiedChannel ifTrue:[^self codeChanged: false].
sender == textView model ifTrue:[
- ^ self sourceChanged:true
+ sender value ~= textView contents ifTrue:[
+ self sourceChanged:true.
+ ^self.
+ ].
].
(sender == textView and:[aspect == #sizeOfContents]) ifTrue:[
- ^ self sourceChanged:true
+ self sourceChanged:true.
+ ^self.
].
].
codeView notNil ifTrue:[
@@ -114,6 +118,7 @@
"Created: / 06-03-2010 / 19:38:07 / Jan Vrany <jan.vrany@fit.cvut.cz>"
"Modified: / 13-09-2011 / 12:00:29 / cg"
"Modified: / 16-09-2011 / 17:30:16 / Jan Vrany <jan.vrany@fit.cvut.cz>"
+ "Modified: / 22-02-2012 / 15:02:16 / jv"
! !
!BackgroundSourceProcessingService methodsFor:'event handling'!
@@ -212,7 +217,7 @@
!BackgroundSourceProcessingService class methodsFor:'documentation'!
version
- ^ '$Id: Tools__BackgroundSourceProcessingService.st 7854 2012-01-30 17:49:41Z vranyj1 $'
+ ^ '$Id: Tools__BackgroundSourceProcessingService.st 7913 2012-02-22 17:35:52Z vranyj1 $'
!
version_CVS
@@ -220,5 +225,5 @@
!
version_SVN
- ^ '$Id: Tools__BackgroundSourceProcessingService.st 7854 2012-01-30 17:49:41Z vranyj1 $'
+ ^ '$Id: Tools__BackgroundSourceProcessingService.st 7913 2012-02-22 17:35:52Z vranyj1 $'
! !