<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>(OT: Did I just manage to link from the class comment in this patch to the mail in which the patch would have been announced later? Ha, should have been <a href="http://lists.squeakfoundation.org/pipermail/squeak-dev/2021-October/216778.html" class="x_OWAAutoLink" id="LPlnk681276">http://lists.squeakfoundation.org/pipermail/squeak-dev/2021-October/216778.html</a>,
of course. I accuse the MVC-stacking like implementation in MorphicToolBuilder >> #<span>runModal: for this trouble. (-:)</span></p>
</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> Freitag, 22. Oktober 2021 15:28:57<br>
<b>An:</b> squeak-dev@lists.squeakfoundation.org<br>
<b>Betreff:</b> [squeak-dev] The Inbox: Tests-ct.466.mcz</font>
<div> </div>
</div>
</div>
<font size="2"><span style="font-size:10pt;">
<div class="PlainText">A new version of Tests was added to project The Inbox:<br>
<a href="http://source.squeak.org/inbox/Tests-ct.466.mcz">http://source.squeak.org/inbox/Tests-ct.466.mcz</a><br>
<br>
==================== Summary ====================<br>
<br>
Name: Tests-ct.466<br>
Author: ct<br>
Time: 22 October 2021, 3:28:55.369526 pm<br>
UUID: 359b8eb8-e155-4448-8039-42ef17ccb09d<br>
Ancestors: Tests-eem.464<br>
<br>
Provides regression tests for an issue with background styling in Shout that is fixed in ShoutCore-ct.86.<br>
<br>
=============== Diff against Tests-eem.464 ===============<br>
<br>
Item was changed:<br>
SystemOrganization addCategory: #'Tests-Bugs'!<br>
SystemOrganization addCategory: #'Tests-Compiler'!<br>
SystemOrganization addCategory: #'Tests-Dependencies'!<br>
SystemOrganization addCategory: #'Tests-Digital Signatures'!<br>
SystemOrganization addCategory: #'Tests-Environments'!<br>
SystemOrganization addCategory: #'Tests-Exceptions'!<br>
SystemOrganization addCategory: #'Tests-FilePackage'!<br>
SystemOrganization addCategory: #'Tests-Files'!<br>
SystemOrganization addCategory: #'Tests-Finalization'!<br>
SystemOrganization addCategory: #'Tests-Hex'!<br>
SystemOrganization addCategory: #'Tests-Installer-Core'!<br>
SystemOrganization addCategory: #'Tests-Localization'!<br>
SystemOrganization addCategory: #'Tests-Monticello'!<br>
SystemOrganization addCategory: #'Tests-Monticello-Mocks'!<br>
SystemOrganization addCategory: #'Tests-Monticello-Utils'!<br>
SystemOrganization addCategory: #'Tests-Object Events'!<br>
SystemOrganization addCategory: #'Tests-ObjectsAsMethods'!<br>
SystemOrganization addCategory: #'Tests-PrimCallController'!<br>
SystemOrganization addCategory: #'Tests-Release'!<br>
SystemOrganization addCategory: #'Tests-System-Applications'!<br>
SystemOrganization addCategory: #'Tests-System-Digital Signatures'!<br>
SystemOrganization addCategory: #'Tests-System-Object Storage'!<br>
SystemOrganization addCategory: #'Tests-System-Preferences'!<br>
SystemOrganization addCategory: #'Tests-System-Support'!<br>
SystemOrganization addCategory: #'Tests-Utilities'!<br>
SystemOrganization addCategory: #'Tests-VM'!<br>
SystemOrganization addCategory: #'Tests-Sound'!<br>
+ SystemOrganization addCategory: #'Tests-ShoutCore-Styling'!<br>
<br>
Item was added:<br>
+ TestCase subclass: #ShoutBackgroundStylingTest<br>
+ instanceVariableNames: 'styler text styledText'<br>
+ classVariableNames: ''<br>
+ poolDictionaries: ''<br>
+ category: 'Tests-ShoutCore-Styling'!<br>
+ <br>
+ !ShoutBackgroundStylingTest commentStamp: 'ct 10/22/2021 15:28' prior: 0!<br>
+ Regression tests for background styling in Shout. See: <a href="http://lists.squeakfoundation.org/pipermail/squeak-dev/2021-October/216777.html.!">
http://lists.squeakfoundation.org/pipermail/squeak-dev/2021-October/216777.html.!</a><br>
<br>
Item was added:<br>
+ ----- Method: ShoutBackgroundStylingTest>>runDeferredUIMessages (in category 'support') -----<br>
+ runDeferredUIMessages<br>
+ <br>
+ self assert: Smalltalk isMorphic.<br>
+ <br>
+ [Project current lastDeferredUIMessage]<br>
+ whileNotNil: [Project current world runStepMethods].!<br>
<br>
Item was added:<br>
+ ----- Method: ShoutBackgroundStylingTest>>setUp (in category 'running') -----<br>
+ setUp<br>
+ <br>
+ super setUp.<br>
+ <br>
+ self runDeferredUIMessages.<br>
+ styler := SHTextStylerST80 new view: self.<br>
+ text := 'foo ^2+3' asText.<br>
+ styledText := nil.!<br>
<br>
Item was added:<br>
+ ----- Method: ShoutBackgroundStylingTest>>stylerStyledInBackground: (in category 'mock view') -----<br>
+ stylerStyledInBackground: aText<br>
+ <br>
+ styledText := aText!<br>
<br>
Item was added:<br>
+ ----- Method: ShoutBackgroundStylingTest>>testBackgroundStyling (in category 'tests') -----<br>
+ testBackgroundStyling<br>
+ <br>
+ styler styleInBackgroundProcess: text.<br>
+ <br>
+ self waitForDeferredUIMessages.<br>
+ self runDeferredUIMessages.<br>
+ <br>
+ self assert: text equals: styledText.!<br>
<br>
Item was added:<br>
+ ----- Method: ShoutBackgroundStylingTest>>testDiscardBackgroundStyling1 (in category 'tests') -----<br>
+ testDiscardBackgroundStyling1<br>
+ <br>
+ styler styleInBackgroundProcess: text.<br>
+ <br>
+ styler discardBackgroundStyling.<br>
+ self runDeferredUIMessages.<br>
+ <br>
+ self assert: styledText isNil.!<br>
<br>
Item was added:<br>
+ ----- Method: ShoutBackgroundStylingTest>>testDiscardBackgroundStyling2 (in category 'tests') -----<br>
+ testDiscardBackgroundStyling2<br>
+ <br>
+ styler styleInBackgroundProcess: text.<br>
+ <br>
+ self waitForDeferredUIMessages.<br>
+ styler discardBackgroundStyling.<br>
+ self runDeferredUIMessages.<br>
+ <br>
+ self assert: styledText isNil.!<br>
<br>
Item was added:<br>
+ ----- Method: ShoutBackgroundStylingTest>>testDiscardBackgroundStyling3 (in category 'tests') -----<br>
+ testDiscardBackgroundStyling3<br>
+ <br>
+ styler styleInBackgroundProcess: text.<br>
+ <br>
+ self waitForDeferredUIMessages.<br>
+ self runDeferredUIMessages.<br>
+ styler discardBackgroundStyling.<br>
+ <br>
+ self assert: text equals: styledText.!<br>
<br>
Item was added:<br>
+ ----- Method: ShoutBackgroundStylingTest>>waitForDeferredUIMessages (in category 'support') -----<br>
+ waitForDeferredUIMessages<br>
+ <br>
+ [Project current lastDeferredUIMessage]<br>
+ whileNil: [10 milliSeconds wait].!<br>
<br>
<br>
</div>
</span></font>
</body>
</html>