diff --git a/examples/demo/src/ewf_roc_server_execution.e b/examples/demo/src/ewf_roc_server_execution.e
index 913ea77..f2a45de 100644
--- a/examples/demo/src/ewf_roc_server_execution.e
+++ b/examples/demo/src/ewf_roc_server_execution.e
@@ -55,7 +55,7 @@ feature -- CMS setup
 		local
 			m: CMS_MODULE
 		do
-			create {CMS_ADMIN_MODULE} m.make (a_setup)
+			create {CMS_ADMIN_MODULE} m.make
 			a_setup.register_module (m)
 
 				-- Auth
diff --git a/modules/admin/cms_admin_module.e b/modules/admin/cms_admin_module.e
index 552538e..08466e0 100644
--- a/modules/admin/cms_admin_module.e
+++ b/modules/admin/cms_admin_module.e
@@ -16,25 +16,19 @@ inherit
 
 	CMS_HOOK_RESPONSE_ALTER
 
---	CMS_REQUEST_UTIL
-
 create
 	make
 
 feature {NONE} -- Initialization
 
-	make (a_setup: CMS_SETUP)
+	make
 			-- Create Current module, disabled by default.
 		do
 			version := "1.0"
 			description := "Service to Administrate CMS (users, modules, etc)"
 			package := "core"
-			config := a_setup
 		end
 
-	config: CMS_SETUP
-			-- Node configuration.
-
 feature -- Access
 
 	name: STRING = "admin"
diff --git a/modules/admin/handler/role/cms_role_form_response.e b/modules/admin/handler/role/cms_role_form_response.e
index 9bebafa..88cd418 100644
--- a/modules/admin/handler/role/cms_role_form_response.e
+++ b/modules/admin/handler/role/cms_role_form_response.e
@@ -448,7 +448,8 @@ feature -- Form
 						if api.user_api.has_error then
 								-- handle error
 						else
-							add_success_message ("Created Role")
+							add_success_message ("Created Role " + link (l_role, "admin/role/" + u.id.out, Void))
+							set_redirection (absolute_url ("admin/role/" + u.id.out, Void))
 						end
 					else
 						a_form_data.report_invalid_field ("username", "Missing role!")