EditTextView.st
changeset 4107 3881490b98f0
parent 4100 3fbb7392a6e1
child 4110 8cf88a86ada9
--- a/EditTextView.st	Fri Nov 13 03:16:40 2009 +0100
+++ b/EditTextView.st	Fri Nov 13 14:18:50 2009 +0100
@@ -5973,7 +5973,6 @@
 
         lastReplacementInfo lastReplacement: someText.
 
-
         selStartLine := selectionStartLine.
         selStartCol := self selectionStartCol.
         selEndLine := selectionEndLine.
@@ -6293,7 +6292,9 @@
     lastStringFromReplaceForNextSearch := aString.
 
     "If the replace came after a search, the next replace will have the ignored case from that search action"
-    lastReplaceIgnoredCase := typeOfSelection == #search ifTrue: [lastSearchIgnoredCase] ifFalse: [nil].
+    lastReplaceIgnoredCase := (typeOfSelection == #search) 
+                                ifTrue: [lastSearchIgnoredCase] 
+                                ifFalse: [nil].
     lastReplacementInfo lastReplaceIgnoredCase: lastReplaceIgnoredCase.
 !
 
@@ -7665,9 +7666,9 @@
 !EditTextView class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libwidg/EditTextView.st,v 1.478 2009-11-11 21:26:39 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg/EditTextView.st,v 1.479 2009-11-13 13:18:50 cg Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libwidg/EditTextView.st,v 1.478 2009-11-11 21:26:39 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg/EditTextView.st,v 1.479 2009-11-13 13:18:50 cg Exp $'
 ! !