Merge pull request #408 from neilsb/server-uri-case-sensitivity
This commit is contained in:
commit
d2da286004
|
@ -34,11 +34,11 @@ function CreateServerGroup()
|
|||
if node = "submit"
|
||||
'Append default ports
|
||||
maxSlashes = 0
|
||||
if left(server_hostname.value,8) = "https://" or left(server_hostname.value,7) = "http://" then maxSlashes = 2
|
||||
if left(lcase(server_hostname.value),8) = "https://" or left(lcase(server_hostname.value),7) = "http://" then maxSlashes = 2
|
||||
'Check to make sure entry has no extra slashes before adding default ports.
|
||||
if Instr(0, server_hostname.value, "/") = maxSlashes then
|
||||
if server_hostname.value.len() > 5 and mid(server_hostname.value, server_hostname.value.len()-4,1) <> ":" and mid(server_hostname.value, server_hostname.value.len()-5,1) <> ":" then
|
||||
if left(server_hostname.value ,5) = "https" then
|
||||
if left(lcase(server_hostname.value) ,5) = "https" then
|
||||
server_hostname.value = server_hostname.value + ":8920"
|
||||
else
|
||||
server_hostname.value = server_hostname.value + ":8096"
|
||||
|
@ -46,12 +46,12 @@ function CreateServerGroup()
|
|||
end if
|
||||
end if
|
||||
'Append http:// to server
|
||||
if left(server_hostname.value,4) <> "http" then server_hostname.value = "http://" + server_hostname.value
|
||||
if left(lcase(server_hostname.value),4) <> "http" then server_hostname.value = "http://" + server_hostname.value
|
||||
'If this is a different server from what we know, reset username/password setting
|
||||
if get_setting("server") <> server_hostname.value then
|
||||
set_setting("username", "")
|
||||
set_setting("password", "")
|
||||
endif
|
||||
end if
|
||||
set_setting("server", server_hostname.value)
|
||||
if ServerInfo() = invalid then
|
||||
' Maybe don't unset setting, but offer as a prompt
|
||||
|
|
Loading…
Reference in New Issue
Block a user