Hello,
I want to move class from package "MyPackage-subPackage" to
"MyPackage-Classes" with the code bellow:
org := (RPackageOrganizer default packageNamed: 'MyPackage').
org addClassTag: #Classes.
org definedClasses do: [ :aClass | |tag|
tag := org classTagForClass: aClass.
org addClassDefinition: aClass toClassTag: #Classes.
org removeClassDefinition: aClass fromClassTag: tag name.
].
It produces this result when browsed with Nautilus, but the class
definition still show the old package:
Object subclass: #MyClass
instanceVariableNames: ''
classVariableNames: ''
package: 'MyPackage-subPackage'
Therefore when saving the package the old package is still represented.
How to do it?
Thanks
Hilaire
--
Dr. Geo
http://drgeo.eu