/[eiffelstudio]/trunk/Src/web/eiffel-cloud/modules/es_cloud/webapi/es_cloud_root_webapi_handler.e
ViewVC logotype

Diff of /trunk/Src/web/eiffel-cloud/modules/es_cloud/webapi/es_cloud_root_webapi_handler.e

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 103674 by jfiat, Mon Oct 2 14:13:35 2017 UTC revision 103675 by jfiat, Tue Nov 12 12:35:53 2019 UTC
# Line 21  feature -- Execution Line 21  feature -- Execution
21                          -- Execute handler for `req' and respond in `res'.                          -- Execute handler for `req' and respond in `res'.
22                  local                  local
23                          rep: like new_response                          rep: like new_response
24                          l_url: READABLE_STRING_8                          l_user: ES_CLOUD_USER
25                  do                  do
26                          rep := new_response (req, res)                          rep := new_response (req, res)
                         l_url := api.url (rep.location + "account/", Void)  
27                          if attached api.user as u then                          if attached api.user as u then
28                                  l_url := l_url + u.id.out                                  create l_user.make (u)
29                                  rep.add_link ("es:account", Void, l_url)                                  add_cloud_user_links_to (a_version, l_user, rep)
30                                  rep.add_link ("es:installations", Void, l_url + "/installations")                                  rep.add_link ("es:account", Void, cloud_user_link (a_version, l_user))
31                                    rep.add_link ("es:installations", Void, cloud_user_installations_link (a_version, l_user))
32                                  add_user_links_to (u, rep)                                  add_user_links_to (u, rep)
33                          else                          else
34                                  rep.add_link ("es:account", Void, l_url)                                  rep.add_link ("es:account", Void, cloud_link (a_version) + "/account/")
35                          end                          end
36                            rep.add_link ("es:plans", Void, cloud_plans_link (a_version))
37                          rep.add_self (req.request_uri)                          rep.add_self (req.request_uri)
38                          rep.execute                          rep.execute
39                  end                  end

Legend:
Removed from v.103674  
changed lines
  Added in v.103675

  ViewVC Help
Powered by ViewVC 1.1.23