X-Git-Url: https://git.hcoop.net/hcoop/portal.git/blobdiff_plain/ba5de264ea4e91c438b3cb6793dffd5cdaadacb6..573def24c0220a72beff4e3f5739a450d83de170:/domain.mlt?ds=sidebyside diff --git a/domain.mlt b/domain.mlt index 78dc955..c426e46 100644 --- a/domain.mlt +++ b/domain.mlt @@ -4,14 +4,19 @@ val admin = Group.inGroupName "server"; if $"req" <> "" then val dom = $"req"; - if Util.validDomain dom then + if not (Util.validDomain dom) then + %>

Invalid domain name

<% + elseif String.isPrefix "www." dom and $"want_www" = "" then + val base = String.extract (dom, 4, NONE) + %>

Are you sure you want to request a domain that begins with "www."?

+

You probably meant to request <% base %> instead, which would grant you the ability to configure <% dom %> as well. Unless you've registered <% dom %> directly with your registrar, you will be unable to configure it without the right to set nameservers for <% base %>.

+

">Yes, go ahead and place the request!

<% + else val id = Domain.add (Init.getUserId(), dom, $"msg"); if not (Domain.notifyNew id) then %>

Error sending e-mail notification

<% end %>

Request added

<% - else - %>

Invalid domain name

<% end elseif $"cmd" = "open" then @@ -22,7 +27,7 @@ elseif $"cmd" = "open" then


- +
By: <% name %>
Time: <% #stamp req %>
Time: <% #stamp req %> (<% Util.diffFromNow (#stamp req) %> ago)
Domain: <% #data req %>
Reason: <% Web.html (#msg req) %>
@@ -43,7 +48,7 @@ elseif $"cmd" = "list" then


- +
By: <% name %>
Time: <% #stamp req %>
Time: <% #stamp req %> (<% Util.diffFromNow (#stamp req) %> ago)
Domain: <% #data req %>
Reason: <% Web.html (#msg req) %>
@@ -67,7 +72,7 @@ elseif $"mod" <> "" then - +
Requestor: <% #name user %>
Time: <% #stamp req %>
Time: <% #stamp req %> (<% Util.diffFromNow (#stamp req) %> ago)
Status: - +
Domain:
Domain:
Reason:
+

Your current domains

+ +

To remove any domain you control, you can run domtool-admin +rmdom $DOMAIN.

+ +
    +<% foreach dom in ChooseDomain.domains (Init.getUserName ()) do %> +
  • <% dom %>
  • +<% end %> +
+ <% end %> <% @footer[] %> \ No newline at end of file