<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=us-ascii">
<meta name="Generator" content="Microsoft Exchange Server">
<!-- converted from text --><style><!-- .EmailQuote { margin-left: 1pt; padding-left: 4pt; border-left: #800000 2px solid; } --></style>
</head>
<body>
<meta content="text/html; charset=UTF-8">
<style type="text/css" style="">
<!--
p
{margin-top:0;
margin-bottom:0}
-->
</style>
<div dir="ltr">
<div id="x_divtagdefaultwrapper" dir="ltr" style="font-size:12pt; color:#000000; font-family:Calibri,Helvetica,sans-serif">
<p>By the way, it might be nice to have #mcModel, #<span>mcPatchOperations, etc.</span> also implemented for Traits. This would be possible because Trait implements #asClassDefinition as well. However, there are sibling classes that do not implement #asClassDefinition
...</p>
<p>How can we solve this? Define a Trait named TMCClass? Or would this be overkill? :-)</p>
<p><br>
</p>
<p>Best,</p>
<p>Christoph</p>
<div id="x_Signature">
<div id="x_divtagdefaultwrapper" dir="ltr" style="font-size:12pt; color:rgb(0,0,0); font-family:Calibri,Helvetica,sans-serif,EmojiFont,"Apple Color Emoji","Segoe UI Emoji",NotoColorEmoji,"Segoe UI Symbol","Android Emoji",EmojiSymbols">
<div name="x_divtagdefaultwrapper" style="font-family:Calibri,Arial,Helvetica,sans-serif; font-size:; margin:0">
<div>
<div class="x__rp_T4" id="x_Item.MessagePartBody">
<div class="x__rp_U4 x_ms-font-weight-regular x_ms-font-color-neutralDark x_rpHighlightAllClass x_rpHighlightBodyClass" id="x_Item.MessageUniqueBody" style="font-family:wf_segoe-ui_normal,"Segoe UI","Segoe WP",Tahoma,Arial,sans-serif,serif,EmojiFont">
<div dir="ltr">
<div id="x_divtagdefaultwrapper"><font face="Calibri,Helvetica,sans-serif,EmojiFont,Apple Color Emoji,Segoe UI Emoji,NotoColorEmoji,Segoe UI Symbol,Android Emoji,EmojiSymbols">
<div id="x_Signature">
<div style="margin:0px"><font style="font-family:Calibri,Arial,Helvetica,sans-serif,serif,EmojiFont"></font></div>
</div>
</font></div>
</div>
</div>
</div>
</div>
<div><font size="2" color="#808080"></font></div>
</div>
</div>
</div>
</div>
<hr tabindex="-1" style="display:inline-block; width:98%">
<div id="x_divRplyFwdMsg" dir="ltr"><font face="Calibri, sans-serif" color="#000000" style="font-size:11pt"><b>Von:</b> Squeak-dev <squeak-dev-bounces@lists.squeakfoundation.org> im Auftrag von commits@source.squeak.org <commits@source.squeak.org><br>
<b>Gesendet:</b> Montag, 30. Dezember 2019 15:17:40<br>
<b>An:</b> squeak-dev@lists.squeakfoundation.org<br>
<b>Betreff:</b> [squeak-dev] The Inbox: Monticello-ct.710.mcz</font>
<div> </div>
</div>
</div>
<font size="2"><span style="font-size:10pt;">
<div class="PlainText">A new version of Monticello was added to project The Inbox:<br>
<a href="http://source.squeak.org/inbox/Monticello-ct.710.mcz">http://source.squeak.org/inbox/Monticello-ct.710.mcz</a><br>
<br>
==================== Summary ====================<br>
<br>
Name: Monticello-ct.710<br>
Author: ct<br>
Time: 30 December 2019, 3:17:37.039602 pm<br>
UUID: 6df89c06-6946-d141-9ebc-bc42ae6d9b7f<br>
Ancestors: Monticello-ct.706<br>
<br>
Improve support for traits by moving some class extensions up to ClassDefinition. This is possible because PackageInfo >> #includesClass: also works with metaclasses or traits.<br>
<br>
Just by the way, this fixes some bugs introduced by SqueakIssueIntegration's UI extensions (see
<a href="https://github.com/hpi-swa-teaching/SqueakIssueIntegration/blob/master/packages/IssueIntegration-UI.package/ClassDescription.extension/instance/toolIconSelector..st">
https://github.com/hpi-swa-teaching/SqueakIssueIntegration/blob/master/packages/IssueIntegration-UI.package/ClassDescription.extension/instance/toolIconSelector..st</a>).<br>
<br>
=============== Diff against Monticello-ct.706 ===============<br>
<br>
Item was removed:<br>
- ----- Method: Class>>packageInfo (in category '*monticello') -----<br>
- packageInfo<br>
- ^ (PackageInfo allPackages select: [ : each | each includesClass: self ])<br>
- ifEmpty: [ nil ]<br>
- ifNotEmpty:<br>
- [ : myPackages | "Select the most-qualified match."<br>
- myPackages detectMax: [ : each | each packageName size ] ]!<br>
<br>
Item was removed:<br>
- ----- Method: Class>>workingCopy (in category '*monticello') -----<br>
- workingCopy<br>
- "Answer the MCWorkingCopy in which I am defined."<br>
- ^ self packageInfo ifNotNil: [ : pi | pi workingCopy ]!<br>
<br>
Item was added:<br>
+ ----- Method: ClassDescription>>packageInfo (in category '*monticello') -----<br>
+ packageInfo<br>
+ ^ (PackageInfo allPackages select: [ : each | each includesClass: self ])<br>
+ ifEmpty: [ nil ]<br>
+ ifNotEmpty:<br>
+ [ : myPackages | "Select the most-qualified match."<br>
+ myPackages detectMax: [ : each | each packageName size ] ]!<br>
<br>
Item was added:<br>
+ ----- Method: ClassDescription>>workingCopy (in category '*monticello') -----<br>
+ workingCopy<br>
+ "Answer the MCWorkingCopy in which I am defined."<br>
+ ^ self packageInfo ifNotNil: [ : pi | pi workingCopy ]!<br>
<br>
<br>
</div>
</span></font>
</body>
</html>