#REFACTORING by cg
class: FileApplicationNoteBook::TextEditor
changed:
#setupCheckModify
#update:with:from:
--- a/FileApplicationNoteBook.st Sat Mar 16 14:51:26 2019 +0100
+++ b/FileApplicationNoteBook.st Sat Mar 16 14:52:08 2019 +0100
@@ -6807,7 +6807,7 @@
^ self
].
changedObject == self itemChanged ifTrue:[
- self enqueueMessage:#changeTextColorForChanged for:self arguments:#().
+ self enqueueMessage:#changeTextColorForChanged.
self itemModified.
^ self
].
@@ -6841,7 +6841,7 @@
super update:something with:aParameter from:changedObject
"Modified: / 29-06-2011 / 19:36:03 / cg"
- "Modified: / 12-03-2019 / 15:28:36 / Claus Gittinger"
+ "Modified: / 16-03-2019 / 14:09:57 / Claus Gittinger"
!
updateTagsBrowser
@@ -6923,16 +6923,12 @@
!
setupCheckModify
-
checkModifiedBlock isNil ifTrue:[
- checkModifiedBlock := [
- self
- enqueueMessage:#checkItemForChangesWithNewSetup
- for:self
- arguments:#().
- ].
+ checkModifiedBlock := [ self enqueueMessage:#checkItemForChangesWithNewSetup ].
].
Processor addTimedBlock:checkModifiedBlock afterSeconds:(self class checkModifiedDelayTime).
+
+ "Modified: / 16-03-2019 / 14:09:51 / Claus Gittinger"
! !
!FileApplicationNoteBook::TextEditor methodsFor:'queries'!