Jocelyn Fiat
bba1d57ce3
Added CMS_MODULE.permissions to allow module to declare the potential permissions. Added support for CMS_LINK.is_forbidden, in relation with CMS_LOCAL_LINK.permission_arguments. Split link "username (Logout)" into 2 links "username" and "logout". Fixed/Changed the way auth modules alter the logout link based on "(Logout)" title, by safer solution based on `location' of the link. Fixed usage of WSF_REQUEST.path_info by using percent_encoded_path_info which is not non unicode path info to be used most of the time. Merged CMS_REPONSE.variables and CMS_REPONSE.values . When possible, prefer usage of CMS_RESPONSE.user instead of CMS_REQUEST_UTIL.current_user (WSF_REQUEST) whenever it is possible. When possible, prefer usage of CMS_RESPONSE.location, rather than usage of WSF_REQUEST.(percent_encoded_)path_info . Code cleaning.
58 lines
1.1 KiB
Plaintext
58 lines
1.1 KiB
Plaintext
note
|
|
description: "Summary description for {CMS_ADMIN_RESPONSE}."
|
|
date: "$Date$"
|
|
revision: "$Revision$"
|
|
|
|
class
|
|
CMS_ADMIN_RESPONSE
|
|
|
|
inherit
|
|
CMS_RESPONSE
|
|
redefine
|
|
make,
|
|
initialize
|
|
end
|
|
|
|
create
|
|
make
|
|
|
|
feature {NONE} -- Initialization
|
|
|
|
make (req: WSF_REQUEST; res: WSF_RESPONSE; a_api: like api)
|
|
do
|
|
create {WSF_NULL_THEME} wsf_theme.make
|
|
Precursor (req, res, a_api)
|
|
end
|
|
|
|
initialize
|
|
do
|
|
Precursor
|
|
create {CMS_TO_WSF_THEME} wsf_theme.make (Current, theme)
|
|
end
|
|
|
|
wsf_theme: WSF_THEME
|
|
|
|
feature -- Process
|
|
|
|
process
|
|
local
|
|
b: STRING
|
|
do
|
|
create b.make_empty
|
|
set_title (translation ("Admin Page", Void))
|
|
b.append ("<ul id=%"content-types%">")
|
|
fixme ("Check how to make it configurable")
|
|
if has_permissions (<< "View any">>) then
|
|
b.append ("<li>" + link ("Users", "admin/users", Void))
|
|
b.append ("<div class=%"description%">View/Edit/Add Users</div>")
|
|
b.append ("</li>")
|
|
b.append ("<li>" + link ("Roles", "admin/roles", Void))
|
|
b.append ("<div class=%"description%">View/Edit/Add Roles</div>")
|
|
b.append ("</li>")
|
|
end
|
|
b.append ("</ul>")
|
|
set_main_content (b)
|
|
end
|
|
|
|
end
|