git.iko.soy/elk
on master help sign in
Fix append on text
4a914a4Evan Czaplicki
libraries/Native/List.js+2−4
compare with master
unifiedsplit
@@ -53,10 +53,8 @@ Elm.Native.List.make = function(elm) {
53 }
53 }
54
54
55 function append(xs,ys) {
55 function append(xs,ys) {
56− if (typeof xs === "string") {
57− if (xs.isText) return Utils.txt(xs.concat(ys));
56+ if (xs.isText) return Utils.txt(xs.concat(ys));
58− return xs.concat(ys);
57+ if (typeof xs === "string") return xs.concat(ys);
59− }
60 if (xs.ctor === '[]') { return ys; }
58 if (xs.ctor === '[]') { return ys; }
61 var root = Cons(xs._0, Nil);
59 var root = Cons(xs._0, Nil);
62 var curr = root;
60 var curr = root;