@@ -1,4 +1,7 @@
smalltalk.addPackage('Helios-Announcements');
+smalltalk.addClass('HLAboutToChange', smalltalk.Object, [], 'Helios-Announcements');
+
smalltalk.addClass('HLAnnouncement', smalltalk.Object, [], 'Helios-Announcements');
@@ -1,4 +1,8 @@
Smalltalk current createPackage: 'Helios-Announcements'!
+Object subclass: #HLAboutToChange
+ instanceVariableNames: ''
+ package: 'Helios-Announcements'!
Object subclass: #HLAnnouncement
instanceVariableNames: ''
package: 'Helios-Announcements'!