Merged back list of available modules in CMS_SETUP.

examples/roc_api/src/ewf_roc_server.e

@@ -121,23 +121,22 @@ feature -- CMS Initialization
 		do
 			log.write_debug (generator + ".initialize_cms")
 
-			create {CMS_DEFAULT_MODULE_COLLECTION} l_modules.make (a_setup)
-			setup_modules (l_modules, a_setup)
+			setup_modules (a_setup)
 
-			create cms.make (a_setup, l_modules)
+			create cms.make (a_setup)
 			cms_service := cms
 		end
 
 feature -- CMS setup
 
-	setup_modules (a_modules: CMS_MODULE_COLLECTION; a_setup: CMS_SETUP)
-			-- Setup modules to be added to the available modules.
+	setup_modules (a_setup: CMS_SETUP)
+			-- Setup additional modules.
 		local
 			m: CMS_MODULE
 		do
 			create {NODE_MODULE} m.make (a_setup)
 			m.enable
-			a_modules.extend (m)
+			a_setup.modules.extend (m)
 		end
 
 	setup_storage (a_setup: CMS_SETUP)