Update of /cvsroot/hcoop/portal
In directory sc8-pr-cvs17.sourceforge.net:/tmp/cvs-serv24833
Modified Files:
domain.mlt
Log Message:
Warn about requesting www.* domains
Index: domain.mlt
===================================================================
RCS file: /cvsroot/hcoop/portal/domain.mlt,v
retrieving revision 1.5
retrieving revision 1.6
diff -C2 -d -r1.5 -r1.6
*** domain.mlt 17 May 2007 18:26:30 -0000 1.5
--- domain.mlt 1 Jan 2008 21:44:45 -0000 1.6
***************
*** 5,9 ****
if $"req" <> "" then
val dom = $"req";
! if Util.validDomain dom then
val id = Domain.add (Init.getUserId(), dom, $"msg");
if not (Domain.notifyNew id) then
--- 5,16 ----
if $"req" <> "" then
val dom = $"req";
! if not (Util.validDomain dom) then
! %><h3>Invalid domain name</h3><%
! elseif String.isPrefix "www." dom and $"want_www" = "" then
! val base = String.extract (dom, 4, NONE)
! %><h3>Are you sure you want to request a domain that begins
with "www."?</h3>
! <p>You probably meant to request <tt><% base %></tt> instead,
which would grant you the ability to configure <tt><% dom %></tt> as well.
Unless you've registered <tt><% dom %></tt> directly with your registrar, you
will be unable to configure it without the right to set nameservers for <tt><%
base %></tt>.</p>
! <p><a href="?req=<% Web.urlEncode dom %>&want_www=1&msg=<%
Web.urlEncode ($"msg") %>">Yes, go ahead and place the request!</a></p><%
! else
val id = Domain.add (Init.getUserId(), dom, $"msg");
if not (Domain.notifyNew id) then
***************
*** 11,16 ****
end
%><h3>Request added</h3><%
- else
- %><h3>Invalid domain name</h3><%
end
--- 18,21 ----
-------------------------------------------------------------------------
This SF.net email is sponsored by: Microsoft
Defy all challenges. Microsoft(R) Visual Studio 2005.
http://clk.atdmt.com/MRT/go/vse0120000070mrt/direct/01/
_______________________________________________
hcoop-cvs mailing list
hcoop-cvs@lists.sourceforge.net
https://lists.sourceforge.net/lists/listinfo/hcoop-cvs
