r5616 - trunk/gnue-appserver/src/classrep

[reinhard]

Author: reinhard
Date: 2004-04-02 08:47:43 -0600 (Fri, 02 Apr 2004)
New Revision: 5616

Modified:
   trunk/gnue-appserver/src/classrep/SchemaSupport.py
Log:
Correctly export module dump if a complete dump is requested.


Modified: trunk/gnue-appserver/src/classrep/SchemaSupport.py
===================================================================
--- trunk/gnue-appserver/src/classrep/SchemaSupport.py  2004-04-02 11:11:21 UTC 
(rev 5615)
+++ trunk/gnue-appserver/src/classrep/SchemaSupport.py  2004-04-02 14:47:43 UTC 
(rev 5616)
@@ -107,23 +107,23 @@
     self.__exportClasses = {}
 
     if items is None or len (items) == 0:
-      items = [aClass.fullName for aClass in self.__classes.values ()]
+      self.__exportModules = self.__modules
+    else:
+      for item in items:
+        # item is a module
+        if Namespace.getNamespaceId (item) == Namespace.NSID_MODULE:
+          aModule = self.__modules [item]
+          self.__exportModules [aModule.fullName] = aModule
 
-    for item in items:
-      # item is a module
-      if Namespace.getNamespaceId (item) == Namespace.NSID_MODULE:
-        aModule = self.__modules [item]
-        self.__exportModules [aModule.fullName] = aModule
+        # or a class
+        elif Namespace.getNamespaceId (item) == Namespace.NSID_CLASS:
+          aClass = self.__classes [item]
+          self.__exportClasses [aClass.fullName] = aClass
 
-      # or a class
-      elif Namespace.getNamespaceId (item) == Namespace.NSID_CLASS:
-        aClass = self.__classes [item]
-        self.__exportClasses [aClass.fullName] = aClass
+        else:
+          # or invalid
+          raise Namespace.InvalidNameError, item
 
-      else:
-        # or invalid
-        raise Namespace.InvalidNameError, item
-
     # create the top-level objects of the XML tree
     self.__schema = Objects.GSSchema ()
     self.__schema.title   = 'Appserver Schema Dump'