The Trunk: Tests-ul.398.mcz

Levente Uzonyi uploaded a new version of Tests to project The Trunk:
http://source.squeak.org/trunk/Tests-ul.398.mcz

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

Name: Tests-ul.398
Author: ul
Time: 14 June 2018, 11:45:12.210587 pm
UUID: 832bc19c-0153-4bbb-bb39-3bdb06cf9d56
Ancestors: Tests-ul.397

- do not nag the user about setting the author initials #2
- fixed LangEnvBugs >> #testIsFontAvailable
- added LocaleTest >> #testIsFontAvailable to #expectedFailures

=============== Diff against Tests-ul.397 ===============

Item was changed:
+ ----- Method: ClassRemovalTest>>performTest (in category 'private') -----
- ----- Method: ClassRemovalTest>>performTest (in category 'as yet unclassified') -----
  performTest
 
  Utilities
  useAuthorInitials: self className
  during: [ super performTest ]!

Item was changed:
  ----- Method: LangEnvBugs>>testIsFontAvailable (in category 'as yet unclassified') -----
  testIsFontAvailable
  "self new testIsFontAvailable"
  "self run: #testIsFontAvailable"
  | oldPref |
  oldPref := Preferences valueOfPreference: #tinyDisplay.
  Preferences restoreFontsAfter: [
  [Preferences enable: #tinyDisplay.
  "This should not throw an exception."
+ (LanguageEnvironment localeID: (LocaleID isoLanguage: 'en')) isFontAvailable]
- (LanguageEnvironment localeID: 'en' ) isFontAvailable]
  ensure: [Preferences setPreference: #tinyDisplay toValue: oldPref]].!

Item was changed:
  ----- Method: LocaleTest>>expectedFailures (in category 'testing') -----
  expectedFailures
 
  ^ super expectedFailures,
  ((NaturalLanguageTranslator translators isEmpty
  or: [(NaturalLanguageTranslator translators values collect: [:t | t localeID ])
  asSet size = 1])
  ifTrue: [#(testLocaleChanged) "no locale available to switch to"]
+ ifFalse: [ #()]),
+ #(testIsFontAvailable "metatoys.org is not accessible")
- ifFalse: [ #()])
  !

Item was added:
+ ----- Method: MCTestCase>>performTest (in category 'as yet unclassified') -----
+ performTest
+
+ Utilities
+ useAuthorInitials: self className
+ during: [ super performTest ]!