1
0

Helios-SUnit.st 302 B

12345678910111213141516171819202122232425
  1. Smalltalk createPackage: 'Helios-SUnit'!
  2. HLWidget subclass: #HLSUnit
  3. instanceVariableNames: ''
  4. package: 'Helios-SUnit'!
  5. !HLSUnit class methodsFor: 'accessing'!
  6. tabClass
  7. ^ 'sunit'
  8. !
  9. tabLabel
  10. ^ 'SUnit'
  11. !
  12. tabPriority
  13. ^ 1000
  14. ! !
  15. !HLSUnit class methodsFor: 'testing'!
  16. canBeOpenAsTab
  17. ^ true
  18. ! !