equal
deleted
inserted
replaced
11 " |
11 " |
12 |
12 |
13 "{ Package: 'stx:libbasic3' }" |
13 "{ Package: 'stx:libbasic3' }" |
14 |
14 |
15 Change subclass:#ClassChange |
15 Change subclass:#ClassChange |
16 instanceVariableNames:'className' |
16 instanceVariableNames:'className package' |
17 classVariableNames:'' |
17 classVariableNames:'' |
18 poolDictionaries:'' |
18 poolDictionaries:'' |
19 category:'System-Changes' |
19 category:'System-Changes' |
20 ! |
20 ! |
21 |
21 |
121 |
121 |
122 className := aString |
122 className := aString |
123 |
123 |
124 "Modified: / 15.7.1996 / 09:28:35 / cg" |
124 "Modified: / 15.7.1996 / 09:28:35 / cg" |
125 "Created: / 16.2.1998 / 13:05:36 / cg" |
125 "Created: / 16.2.1998 / 13:05:36 / cg" |
|
126 ! |
|
127 |
|
128 package |
|
129 "return the value of the instance variable 'package' (automatically generated)" |
|
130 |
|
131 ^ package |
|
132 ! |
|
133 |
|
134 package:something |
|
135 "set the value of the instance variable 'package' (automatically generated)" |
|
136 |
|
137 package := something. |
126 ! ! |
138 ! ! |
127 |
139 |
128 !ClassChange methodsFor:'applying'! |
140 !ClassChange methodsFor:'applying'! |
129 |
141 |
130 apply |
142 apply |
194 ! ! |
206 ! ! |
195 |
207 |
196 !ClassChange class methodsFor:'documentation'! |
208 !ClassChange class methodsFor:'documentation'! |
197 |
209 |
198 version |
210 version |
199 ^ '$Header: /cvs/stx/stx/libbasic3/ClassChange.st,v 1.33 2003-02-04 21:37:12 cg Exp $' |
211 ^ '$Header: /cvs/stx/stx/libbasic3/ClassChange.st,v 1.34 2003-04-09 12:21:54 james Exp $' |
200 ! ! |
212 ! ! |