Comment #7 on issue 3280 by gazzaguru2: Focus indicator for pluggable text morphs not correctly drawn http://code.google.com/p/pharo/issues/detail?id=3280 Though technically an unrelated issue try the following to see if you like it better ;-) PopupChoiceDialogWindow filter: aString "Set the value of filter, used to match the valid choices." filter := aString. self changed: #filter. (self choiceMenus ifNil: [^self]) do: [:embeddedMenu | embeddedMenu selectItem: nil event: nil]. "clear selection in other menus" self choiceMenus do: [:embeddedMenu | embeddedMenu selectMatch: self filter asLowercase]. self filterMorph hasKeyboardFocus ifFalse: [ self activeHand newKeyboardFocus: self filterMorph. self filterMorph selectFrom: filter size + 1 to: filter size + 1]