Marcel Taeumel uploaded a new version of Morphic to project The Trunk:
http://source.squeak.org/trunk/Morphic-mt.1645.mcz

==================== Summary ====================

Name: Morphic-mt.1645
Author: mt
Time: 15 April 2020, 3:58:57.961534 pm
UUID: 7c18f364-8317-2340-9326-cf101041cfb3
Ancestors: Morphic-mt.1644

Fixes the issue that an empty replacement string was not accepted by the text editor. Now it is.

(Complements ToolBuilder-Kernel-mt.138)

=============== Diff against Morphic-mt.1644 ===============

Item was changed:
  ----- Method: TextEditor>>findReplace (in category 'menu messages') -----
  findReplace
  
  	self
  		setSearchFromSelectionOrHistory;
  		setReplacementFromHistory.
  
+ 	(Project uiManager
+ 		request: 'Find what to replace?'
+ 		initialAnswer: FindText)
+ 			ifNotEmpty: [:find |
+ 
+ 				(Project uiManager
+ 					request: ('Replace ''{1}'' with?' format: {find})
+ 					initialAnswer: (ChangeText ifEmpty: [find])
+ 					onCancelReturn: nil)
+ 						ifNotNil: [:replace |
+ 
+ 							FindText := find.
+ 							ChangeText := replace.
+ 							self findReplaceAgainNow]]!
- 	(UIManager default request: 'Find what to replace?' initialAnswer: FindText)
- 		ifEmpty: [^ self]
- 		ifNotEmpty: [:find |
- 			(UIManager default request: ('Replace ''{1}'' with?' format: {find}) initialAnswer: (ChangeText ifEmpty: [find]))
- 				ifEmpty: [^ self]
- 				ifNotEmpty: [:replace |
- 					FindText := find.
- 					ChangeText := replace.
- 					self findReplaceAgainNow]]!