Mercurial Mercurial > hg > stx-libbasic / changeset
summary | shortlog | changelog | graph | tags | bookmarks | branches | files | changeset | raw | zip | gz | bz2 | help
Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
*** empty log message ***
authorClaus Gittinger <cg@exept.de>
Mon, 04 Nov 2002 16:17:54 +0100
changeset 6825 517d941b94f9
parent 6824 6fbe85d05646
child 6826 debb693dd98a
*** empty log message ***
ClassBuilder.st file | annotate | diff | comparison | revisions 
--- a/ClassBuilder.st	Mon Nov 04 15:52:10 2002 +0100
+++ b/ClassBuilder.st	Mon Nov 04 16:17:54 2002 +0100
@@ -245,23 +245,7 @@
 
 !ClassBuilder methodsFor:'accessing'!
 
-name:newName in:aSystemDictionaryOrClass subclassOf:aClass instanceVariableNames:stringOfInstVarNames indexedType:indexedTypeSymbol classVariableNames:stringOfClassVarNames poolDictionaries:stringOfPoolNames category:categoryString comment:commentString changed:changedBoolean classInstanceVariableNames:stringOfClassInstVarNamesOrNil 
-    className := newName.
-    environment := aSystemDictionaryOrClass.
-    superClass := aClass.
-    instanceVariableNames := stringOfInstVarNames.
-    variable := indexedTypeSymbol.
-"/    words := wordsBoolean.
-"/    pointers := pointersBoolean.
-    classVariableNames := stringOfClassVarNames.
-    poolDictionaries := stringOfPoolNames.
-    category := categoryString.
-    comment := commentString.
-    changed := changedBoolean.
-    classInstanceVariableNames := stringOfClassInstVarNamesOrNil
-!
-
-name:newName in:aSystemDictionaryOrClass subclassOf:aClass instanceVariableNames:stringOfInstVarNames variable:variableBoolean words:wordsBoolean pointers:pointersBoolean classVariableNames:stringOfClassVarNames poolDictionaries:stringOfPoolNames category:categoryString comment:commentString changed:changedBoolean classInstanceVariableNames:stringOfClassInstVarNamesOrNil 
+name:newName inEnvironment:aSystemDictionaryOrClass subclassOf:aClass instanceVariableNames:stringOfInstVarNames variable:variableBoolean words:wordsBoolean pointers:pointersBoolean classVariableNames:stringOfClassVarNames poolDictionaries:stringOfPoolNames category:categoryString comment:commentString changed:changedBoolean classInstanceVariableNames:stringOfClassInstVarNamesOrNil 
     className := newName.
     environment := aSystemDictionaryOrClass.
     superClass := aClass.
@@ -1916,5 +1900,5 @@
 !ClassBuilder class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic/ClassBuilder.st,v 1.16 2002-08-09 12:27:16 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/ClassBuilder.st,v 1.17 2002-11-04 15:17:54 cg Exp $'
 ! !
hg/stx-libbasic