#REFACTORING by cg
class: ResourceSelectionBrowser
changed: #postBuildWith: (send #beepInEditor instead of #beep)
--- a/ResourceSelectionBrowser.st Thu Jan 18 17:09:06 2018 +0100
+++ b/ResourceSelectionBrowser.st Thu Jan 18 17:12:12 2018 +0100
@@ -977,7 +977,7 @@
what := Smalltalk classnameCompletion:s inEnvironment:Smalltalk.
classNameInputField contents:what first.
(what at:2) size ~~ 1 ifTrue:[
- classNameInputField device beep
+ classNameInputField device beepInEditor
]
"/ |what oldClassName|
"/ oldClassName := classNameInputField contents.