<br><br><div class="gmail_quote">On Fri, Sep 7, 2012 at 4:46 AM,  <span dir="ltr">&lt;<a href="mailto:commits@source.squeak.org" target="_blank">commits@source.squeak.org</a>&gt;</span> wrote:<br><blockquote class="gmail_quote" style="margin:0 0 0 .8ex;border-left:1px #ccc solid;padding-left:1ex">
Bert Freudenberg uploaded a new version of Monticello to project The Trunk:<br>
<a href="http://source.squeak.org/trunk/Monticello-bf.523.mcz" target="_blank">http://source.squeak.org/trunk/Monticello-bf.523.mcz</a><br>
<br>
==================== Summary ====================<br>
<br>
Name: Monticello-bf.523<br>
Author: bf<br>
Time: 7 September 2012, 1:46:20.526 pm<br>
UUID: d75a5c9e-14ea-40dd-baaf-243d2f4fa6c1<br>
Ancestors: Monticello-cmm.522<br>
<br>
Sundry improvements:<br>
* trim space for version name when saving<br>
* when browsing a package snapshot, do not show the *Extensions category unless the package actually has extension methods<br></blockquote><div><br></div><div>Thank you!!!!!</div><div> </div><blockquote class="gmail_quote" style="margin:0 0 0 .8ex;border-left:1px #ccc solid;padding-left:1ex">

* mention &#39;package&#39; in summary line for package load/unload scripts<br>
<br>
=============== Diff against Monticello-cmm.522 ===============<br>
<br>
Item was changed:<br>
  ----- Method: MCScriptDefinition&gt;&gt;summary (in category &#39;accessing&#39;) -----<br>
  summary<br>
+       ^ packageName, &#39; package &#39;, self scriptSelector!<br>
-       ^ packageName, &#39; &#39;, self scriptSelector!<br>
<br>
Item was added:<br>
+ ----- Method: MCSnapshotBrowser&gt;&gt;hasExtensions (in category &#39;accessing&#39;) -----<br>
+ hasExtensions<br>
+       ^self extensionClassNames notEmpty!<br>
<br>
Item was changed:<br>
  ----- Method: MCSnapshotBrowser&gt;&gt;visibleCategories (in category &#39;listing&#39;) -----<br>
  visibleCategories<br>
        ^ ((self packageOrganizations gather: [:ea | ea categories]),<br>
+               (self packageClasses collect: [:ea | ea category]),<br>
+                       (self hasExtensions ifTrue: [{self extensionsCategory}] ifFalse: [#()]))<br>
+                               asSet asSortedCollection!<br>
-               (self packageClasses collect: [:ea | ea category]))<br>
-                       asSet asSortedCollection add: self extensionsCategory; yourself.!<br>
<br>
Item was changed:<br>
  ----- Method: MCWorkingCopy&gt;&gt;newVersion (in category &#39;operations&#39;) -----<br>
  newVersion<br>
        ^ (self requestVersionNameAndMessageWithSuggestion: self uniqueVersionName<br>
                initialMessage: self patchMessageSuggestion) ifNotNil:<br>
                        [:pair |<br>
+                       self newVersionWithName: pair first withBlanksTrimmed<br>
-                       self newVersionWithName: pair first<br>
                                message: (self patchMessageStripped: pair last)].<br>
  !<br>
<br>
<br>
</blockquote></div><br><br clear="all"><div><br></div>-- <br>best,<div>Eliot</div><br>