[Pkg] The Trunk: CollectionsTests-topa.274.mcz

commits at source.squeak.org commits at source.squeak.org
Fri Feb 10 16:31:58 UTC 2017


Tobias Pape uploaded a new version of CollectionsTests to project The Trunk:
http://source.squeak.org/trunk/CollectionsTests-topa.274.mcz

==================== Summary ====================

Name: CollectionsTests-topa.274
Author: topa
Time: 10 February 2017, 5:31:44.149227 pm
UUID: 423db775-bc0b-40e8-8960-6c7073e21cd9
Ancestors: CollectionsTests-topa.273

HtmlReadWriterTest: Support alignment, strike through (Collections-topa.733)

=============== Diff against CollectionsTests-topa.273 ===============

Item was added:
+ ----- Method: HtmlReadWriterTest>>test09StruckOut (in category 'tests') -----
+ test09StruckOut
+ 
+ 	{
+ 		'<s>Hello, World!!</s>'.
+ 		'Hello, World!!' asText addAttribute: TextEmphasis struckOut.
+ 		
+ 		'<s>Hello</s>, World!!'.		
+ 		'Hello, World!!' asText addAttribute: TextEmphasis struckOut from: 1 to: 5.
+ 	} pairsDo: [:expectedHtml :expectedText |
+ 		
+ 		self convertHtml: expectedHtml.
+ 		self assert: expectedText string equals: text string.
+ 		self assert: expectedText runs equals: text runs.
+ 		
+ 		self convertText: expectedText.
+ 		self assert: expectedHtml equals: html].!

Item was added:
+ ----- Method: HtmlReadWriterTest>>test10Underline (in category 'tests') -----
+ test10Underline
+ 
+ 	{
+ 		'<u>Hello, World!!</u>'.
+ 		'Hello, World!!' asText addAttribute: TextEmphasis underlined.
+ 		
+ 		'<u>Hello</u>, World!!'.		
+ 		'Hello, World!!' asText addAttribute: TextEmphasis underlined from: 1 to: 5.
+ 	} pairsDo: [:expectedHtml :expectedText |
+ 		
+ 		self convertHtml: expectedHtml.
+ 		self assert: expectedText string equals: text string.
+ 		self assert: expectedText runs equals: text runs.
+ 		
+ 		self convertText: expectedText.
+ 		self assert: expectedHtml equals: html].!

Item was added:
+ ----- Method: HtmlReadWriterTest>>test11Alignment (in category 'tests') -----
+ test11Alignment
+ 
+ 	{
+ 	"	'<center>Hello, World!!</center>'.
+ 		'Hello, World!!' asText addAttribute: TextAlignment centered.
+ "
+ 		'<div align=left>Hello, World!!</div>'.
+ 		'Hello, World!!' asText addAttribute: TextAlignment leftFlush.
+ 
+ 		'<div align=right>Hello, World!!</div>'.
+ 		'Hello, World!!' asText addAttribute: TextAlignment rightFlush.
+ 
+ 		'<div align=justify>Hello, World!!</div>'.
+ 		'Hello, World!!' asText addAttribute: TextAlignment justified.
+ 	} pairsDo: [:expectedHtml :expectedText |
+ 		
+ 		self convertHtml: expectedHtml.
+ 		self assert: expectedText string equals: text string.
+ 		self assert: expectedText runs equals: text runs.
+ 		
+ 		self convertText: expectedText.
+ 		self assert: expectedHtml equals: html].!

Item was added:
+ ----- Method: HtmlReadWriterTest>>test12AlignmentMixed (in category 'tests') -----
+ test12AlignmentMixed
+ 
+ 	{
+ 		'<center>Hello, <i>World!!</i></center>'.
+ 		'Hello, World!!' asText
+ 			addAttribute: TextAlignment centered;
+ 			addAttribute: TextEmphasis italic from: 8 to: 13.
+ 	} pairsDo: [:expectedHtml :expectedText |
+ 		
+ 		self convertHtml: expectedHtml.
+ 		self assert: expectedText string equals: text string.
+ 		self assert: expectedText runs equals: text runs.
+ 		
+ 		self convertText: expectedText.
+ 		self assert: expectedHtml equals: html].!



More information about the Packages mailing list