Inherit protocol and endpoint when not specified.

elm-lang · Jul 7, 2016 · a23087d · a23087d
1 parent deb5b75
commit a23087d
Showing 1 changed file with 11 additions and 1 deletion.
diff --git a/src/Native/WebSocket.js b/src/Native/WebSocket.js
@@ -1,12 +1,22 @@
 var _elm_lang$websocket$Native_WebSocket = function() {
 
+function getProtocol(){ return location.protocol.match(/^https/) ? "wss" : "ws" }
+
+function getEndpointURL(uri)
+{
+  if(uri.charAt(0) !== "/"){ return uri; }
+  if(uri.charAt(1) === "/"){ return getProtocol() + ':' + uri; }
+
+  return getProtocol() + '://' + location.host + uri;
+}
+
 function open(url, settings)
 {
 	return _elm_lang$core$Native_Scheduler.nativeBinding(function(callback)
 	{
 		try
 		{
-			var socket = new WebSocket(url);
+			var socket = new WebSocket(getEndpointURL(url));
 		}
 		catch(err)
 		{