Hmph -- since you were asking for consensus on something, it would be
nice to have a little more time to respond -- as I did in < 24 hours,
but still apparently too late.


didn't get much discussion.  ay we please have more time

On Thu, May 2, 2013 at 5:56 AM,  <commits at source.squeak.org> wrote:
> Frank Shearar uploaded a new version of Collections to project The Trunk:
> http://source.squeak.org/trunk/Collections-fbs.516.mcz
>
> ==================== Summary ====================
>
> Name: Collections-fbs.516
> Author: fbs
> Time: 1 May 2013, 10:14:23.588 pm
> UUID: e787006a-d096-47f3-93da-c4681285fae2
> Ancestors: Collections-ul.515
>
> Surrounding the -> in an Assocation in printed form allows the left side to be a binary selector without things breaking: #* -> #+ otherwise prints as '#*->#+', which is the Symbol #*-> followed by garbage.
>
> =============== Diff against Collections-ul.515 ===============
>
> Item was changed:
>   ----- Method: Association>>printOn: (in category 'printing') -----
>   printOn: aStream
>
>         super printOn: aStream.
> +       "If the key is a binary selector and we don't use whitespace, we will stream (key, '->') asSymbol."
> +       aStream nextPutAll: ' -> '.
> -       aStream nextPutAll: '->'.
>         value printOn: aStream!
>
> Item was changed:
>   ----- Method: Association>>storeOn: (in category 'printing') -----
>   storeOn: aStream
>         "Store in the format (key->value)"
>         aStream nextPut: $(.
>         key storeOn: aStream.
> +       "If key is a binary selector and we don't use whitespace, we will stream (key, '->') asSymbol."
> +       aStream nextPutAll: ' -> '.
> -       aStream nextPutAll: '->'.
>         value storeOn: aStream.
>         aStream nextPut: $)!
>
>