<body><div id="__MailbirdStyleContent" style="font-size: 10pt;font-family: Arial;color: #000000;text-align: left" dir="ltr">
Yes. +1<div><br></div><div>Note that you can use Form as a button label.</div><div><br></div><div>Best,</div><div>Marcel</div><div class="mb_sig"></div><blockquote class='history_container' type='cite' style='border-left-style:solid;border-width:1px; margin-top:20px; margin-left:0px;padding-left:10px;'>
<p style='color: #AAAAAA; margin-top: 10px;'>Am 02.04.2022 18:50:07 schrieb commits@source.squeak.org <commits@source.squeak.org>:</p><div style='font-family:Arial,Helvetica,sans-serif'>A new version of Protocols was added to project The Inbox:<br>http://source.squeak.org/inbox/Protocols-ct.83.mcz<br><br>==================== Summary ====================<br><br>Name: Protocols-ct.83<br>Author: ct<br>Time: 2 April 2022, 6:49:54.492838 pm<br>UUID: 63954fa8-6cc1-8048-8bbb-5c9a2d49332d<br>Ancestors: Protocols-mt.82<br><br>Replaces missing icon in lexicon. Is this ok?<br><br>=============== Diff against Protocols-mt.82 ===============<br><br>Item was changed:<br> ----- Method: Lexicon>>addSpecialButtonsTo:with: (in category 'toolbuilder') -----<br> addSpecialButtonsTo: buttonPanelSpec with: builder<br> <br> | homeCatBtnSpec menuBtnSpec mostGenericBtnSpec |<br> homeCatBtnSpec := builder pluggableButtonSpec new<br> model: self;<br> action: #showHomeCategory;<br>+ label: MenuIcons smallHomeIcon asMorph;<br>- label: (ScriptingSystem formAtKey: #Cat) asMorph;<br> help: 'show this method''s home category';<br> yourself.<br> menuBtnSpec := builder pluggableButtonSpec new<br> model: self;<br> action: #offerMenu;<br> label: (ScriptingSystem formAtKey: #TinyMenu) asMorph;<br> help: 'click here to get a menu with further options';<br> yourself.<br> mostGenericBtnSpec :=builder pluggableButtonSpec new<br> model: self;<br> action: #chooseLimitClass;<br> label: #limitClassString;<br> help: 'Governs which classes'' methods should be shown. If this is the same as the viewed class, then only methods implemented in that class will be shown. If it is ProtoObject, then methods of all classes in the vocabulary will be shown.'.<br> buttonPanelSpec children<br> add: homeCatBtnSpec;<br> addFirst: mostGenericBtnSpec;<br> addFirst: menuBtnSpec.!<br><br><br></div></blockquote>
</div></body>