diff --git a/libraries/Native/Utils.js b/libraries/Native/Utils.js index f52ad65..5da2c9f 100644 --- a/libraries/Native/Utils.js +++ b/libraries/Native/Utils.js @@ -25,7 +25,9 @@ Elm.Native.Utils.make = function(elm) { function compare(x,y) { return { ctor: ord[cmp(x,y)+1] } } function cmp(x,y) { var ord; - if (typeof x !== 'object') return x === y ? EQ : x < y ? LT : GT; + if (typeof x !== 'object' || x instanceof String){ + return x === y ? EQ : x < y ? LT : GT; + } if (x.ctor === "::" || x.ctor === "[]") { while (true) {