<div dir="ltr">In the package pane menu?<div>I could not see it. It was just 4 items in the menu.</div><div><br></div><div>Best,</div><div>Karl</div><div><br></div></div><div class="gmail_extra"><br><div class="gmail_quote">On Wed, Nov 25, 2015 at 5:14 PM, Chris Muller <span dir="ltr"><<a href="mailto:asqueaker@gmail.com" target="_blank">asqueaker@gmail.com</a>></span> wrote:<br><blockquote class="gmail_quote" style="margin:0 0 0 .8ex;border-left:1px #ccc solid;padding-left:1ex">There is already an "alphabetize" function.<br>
<div class="HOEnZb"><div class="h5"><br>
On Wed, Nov 25, 2015 at 5:32 AM, <<a href="mailto:commits@source.squeak.org">commits@source.squeak.org</a>> wrote:<br>
> A new version of Tools was added to project The Inbox:<br>
> <a href="http://source.squeak.org/inbox/Tools-kfr.657.mcz" rel="noreferrer" target="_blank">http://source.squeak.org/inbox/Tools-kfr.657.mcz</a><br>
><br>
> ==================== Summary ====================<br>
><br>
> Name: Tools-kfr.657<br>
> Author: kfr<br>
> Time: 25 November 2015, 12:31:59.64 pm<br>
> UUID: 4c535bc5-5f99-42b3-8caa-4dc9bafb00ba<br>
> Ancestors: Tools-kfr.656<br>
><br>
> Adds a toggle to show packages alphabetically in the PackagePaneBrowser<br>
><br>
> =============== Diff against Tools-kfr.656 ===============<br>
><br>
> Item was changed:<br>
> Browser subclass: #PackagePaneBrowser<br>
> + instanceVariableNames: 'package packageListIndex packageList packageListSorted'<br>
> - instanceVariableNames: 'package packageListIndex packageList'<br>
> classVariableNames: ''<br>
> poolDictionaries: ''<br>
> category: 'Tools-Browser'!<br>
><br>
> !PackagePaneBrowser commentStamp: '<historical>' prior: 0!<br>
> A package browser represents a hierarchical query path through an organization of class and method information. It parses class categories into a two-level hierarchy on the first '-' character, giving "packages" (e.g., Magnitude, Collections, Graphics, etc.), and "categories" (e.g., Magnitude-General and Magnitude-Number).<br>
><br>
> Instance Variables:<br>
> package <Symbol> the "category header," e.g., #Magnitudes or #Collections<br>
> packageListIndex <Integer> The index in the package list<br>
> packageList <OrderedCollection of String> the list of package names<br>
> !<br>
><br>
> Item was changed:<br>
> ----- Method: PackagePaneBrowser>>mainPackageMenu: (in category 'package list') -----<br>
> mainPackageMenu: aMenu<br>
> "Answer a Menu of operations on class packages to be<br>
> displayed when the operate menu button is pressed."<br>
> <packageListMenu><br>
> ^aMenu addList: #(<br>
> ('find class...' findClass)<br>
> ('recent classes...' recent)<br>
> -<br>
> ('reorganize' editSystemCategories)<br>
> + ('show alphabetically' togglePackageListSorted)<br>
> + ('show unsorted' togglePackageListSorted)<br>
> ('update' updatePackages));<br>
> yourself.<br>
> !<br>
><br>
> Item was changed:<br>
> ----- Method: PackagePaneBrowser>>packageList (in category 'package list') -----<br>
> packageList<br>
> "Answer a list of the packages in the current system organization."<br>
><br>
> | str stream |<br>
> str := Set new: 100.<br>
> stream := WriteStream on: (Array new: 100).<br>
> systemOrganizer categories do:<br>
> [ :categ | | cats |<br>
> cats := categ asString copyUpTo: $-.<br>
> (str includes: cats) ifFalse:<br>
> [str add: cats.<br>
> stream nextPut: cats]].<br>
> + packageListSorted<br>
> + ifTrue:[ ^stream contents sorted]<br>
> + ifFalse:[ ^stream contents]!<br>
> - ^stream contents!<br>
><br>
> Item was changed:<br>
> ----- Method: PackagePaneBrowser>>systemOrganizer: (in category 'initialize-release') -----<br>
> systemOrganizer: aSystemOrganizer<br>
> "Initialize the receiver as a perspective on the system organizer,<br>
> aSystemOrganizer. Typically there is only one--the system variable<br>
> SystemOrganization."<br>
><br>
> super systemOrganizer: aSystemOrganizer .<br>
> + packageListIndex := 0.<br>
> + packageListSorted := false!<br>
> - packageListIndex := 0!<br>
><br>
> Item was added:<br>
> + ----- Method: PackagePaneBrowser>>togglePackageListSorted (in category 'package list') -----<br>
> + togglePackageListSorted<br>
> + packageListSorted<br>
> + ifTrue:[ packageListSorted := false]<br>
> + ifFalse:[ packageListSorted := true]<br>
> + !<br>
><br>
><br>
<br>
</div></div></blockquote></div><br></div>