--- a/Tools_SearchDialog.st Thu Sep 25 14:18:25 2008 +0200
+++ b/Tools_SearchDialog.st Thu Sep 25 14:18:46 2008 +0200
@@ -843,6 +843,7 @@
checkCodeAction := [ self checkCodeIn:codeField notifying:errMessageField. ].
codeField modifiedChannel onChangeEvaluate:checkCodeAction.
+ self isMethodHolder onChangeEvaluate:checkCodeAction.
initial := browser selectionInCodeView.
initial isEmptyOrNil ifTrue:[
@@ -864,8 +865,8 @@
line := codeField lineOfCharacterPosition:pos.
col := (codeField colOfCharacterPosition:pos) max:1.
- badLine := (codeField listAt:line) ? ''
-. col <= badLine size size ifTrue:[
+ badLine := (codeField listAt:line) ? ''.
+ col <= badLine size size ifTrue:[
codeField
listAt:line
put:(badLine asText
@@ -1099,5 +1100,5 @@
!SearchDialog class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libtool/Tools_SearchDialog.st,v 1.29 2008-09-06 14:48:21 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libtool/Tools_SearchDialog.st,v 1.30 2008-09-25 12:18:46 cg Exp $'
! !