# HG changeset patch # User Claus Gittinger # Date 1563530038 -7200 # Node ID 46c77420db3bbbed94c345510ea6f5ac6e222bd4 # Parent 530f3998b3a2c90eaf2f026d16fbaf5ffb380a63 #UI_ENHANCEMENT by cg class: MethodFinderWindow changed: #showMeHowItWorks category of: #aboutThisApplicationText #openHTMLDocumentation #showMeHowItWorks diff -r 530f3998b3a2 -r 46c77420db3b MethodFinderWindow.st --- a/MethodFinderWindow.st Thu Jul 18 21:59:30 2019 +0200 +++ b/MethodFinderWindow.st Fri Jul 19 11:53:58 2019 +0200 @@ -1,3 +1,5 @@ +"{ Encoding: utf8 }" + " Copyright (C) Original Authors (Kaehler, Scott Wallace and Dan Ingalls) Copyright (C) 2001 eXept Software AG @@ -1692,39 +1694,6 @@ ^receiverWithArgument ! ! -!MethodFinderWindow methodsFor:'help - demonstration'! - -showMeHowItWorks - ShowMeHowItWorks do:#( - showing: 'Choose the number of arguments' - do: ( - moveTo: NumberOfArguments - select: '1' - ) - showing: 'Click into the "receiver" field' - do: ( - moveTo: ReceiverEditor - click: ReceiverEditor - ) - showing: 'Enter a value (or expression) into "receiver" field' - do: ( - enter: '100' - ) - showing: 'Click into the "first argument" field' - do: ( - moveTo: Arg1Editor - click: ReceiverEditor - ) - showing: 'Enter a value (or expression) into "receiver" field' - do: ( - enter: '100' - ) - - ) - - "Created: / 18-07-2019 / 21:59:06 / Claus Gittinger" -! ! - !MethodFinderWindow methodsFor:'initialization'! argument1WidgetCreated: aWidget @@ -1782,7 +1751,7 @@ "Modified: / 13.11.2001 / 12:51:23 / cg" ! ! -!MethodFinderWindow methodsFor:'menu actions'! +!MethodFinderWindow methodsFor:'menu actions - help'! aboutThisApplicationText |msg| @@ -1801,6 +1770,33 @@ "about/help menu action" HTMLDocumentView openFullOnDocumentationFile:'tools/misc/TOP.html#METHODFINDER' +! + +showMeHowItWorks + ShowMeHowItWorks do:#( + ( showing: 'Choose the number of arguments' do:( + moveTo: NumberOfArguments + select: '1' + )) + (showing: 'Click into the "receiver" field' do:( + moveTo: ReceiverEditor + click: ReceiverEditor + )) + (showing: 'Enter a value (or expression) into "receiver" field' do:( + enter: '100' + )) + (showing: 'Click into the "first argument" field' do:( + moveTo: Arg1Editor + click: ReceiverEditor + )) + (showing: 'Enter a value (or expression) into "receiver" field' do:( + enter: '100' + )) + + ) + + "Created: / 18-07-2019 / 21:59:06 / Claus Gittinger" + "Modified: / 19-07-2019 / 11:05:20 / Claus Gittinger" ! ! !MethodFinderWindow methodsFor:'private'!