note description: "CMS module providing Administration support (back-end)." date: "$Date$" revision: "$Revision$" class CMS_ADMIN_MODULE inherit CMS_MODULE redefine permissions end CMS_ADMINISTRABLE create make feature {NONE} -- Initialization make -- Create Current module, disabled by default. do version := "1.0" description := "Service to Administrate CMS (users, modules, etc)" package := "core" enable -- Is enabled by default end feature -- Access name: STRING = "admin" feature {CMS_EXECUTION} -- Administration administration: CMS_ADMIN_MODULE_ADMINISTRATION do create Result.make (Current) end feature -- Access: router setup_router (a_router: WSF_ROUTER; a_api: CMS_API) -- do end feature -- Security permissions: LIST [READABLE_STRING_8] -- List of permission ids, used by this module, and declared. do Result := Precursor Result.force ("access admin") Result.force ("clear blocks cache") end note copyright: "2011-2015, Jocelyn Fiat, Javier Velilla, Eiffel Software and others" license: "Eiffel Forum License v2 (see http://www.eiffel.com/licensing/forum.txt)" end