Simplify.

No need for IE7/IE8 compat.

src/Web.js

@@ -2978,12 +2978,7 @@ var self=this,$self=this;
 //>>excludeStart("ctx", pragmas.excludeDebugContexts);
 return $core.withContext(function($ctx1) {
 //>>excludeEnd("ctx");
-var element=$self.element;
-	if (null == element.canHaveChildren || element.canHaveChildren) {
-		element.appendChild(anElement);
-	} else {
-		element.text = String(element.text) + anElement.innerHTML;
-	};
+$recv($self.element)._appendChild_(anElement);
 return self;
 //>>excludeStart("ctx", pragmas.excludeDebugContexts);
 }, function($ctx1) {$ctx1.fill(self,"appendChild:",{anElement:anElement})});
@@ -2991,11 +2986,11 @@ return self;
 },
 //>>excludeStart("ide", pragmas.excludeIdeData);
 args: ["anElement"],
-source: "appendChild: anElement\x0a\x09\x22In IE7 and IE8 appendChild fails on several node types. So we need to check\x22\x0a\x09<inlineJS: 'var element=$self.element;\x0a\x09if (null == element.canHaveChildren || element.canHaveChildren) {\x0a\x09\x09element.appendChild(anElement);\x0a\x09} else {\x0a\x09\x09element.text = String(element.text) + anElement.innerHTML;\x0a\x09}'>",
+source: "appendChild: anElement\x0a\x09element appendChild: anElement",
 referencedClasses: [],
 //>>excludeEnd("ide");
-pragmas: [["inlineJS:", ["var element=$self.element;\x0a\x09if (null == element.canHaveChildren || element.canHaveChildren) {\x0a\x09\x09element.appendChild(anElement);\x0a\x09} else {\x0a\x09\x09element.text = String(element.text) + anElement.innerHTML;\x0a\x09}"]]],
-messageSends: []
+pragmas: [],
+messageSends: ["appendChild:"]
 }),
 $globals.TagBrush);
 

src/Web.st

@@ -561,13 +561,7 @@ appendBlock: aBlock
 !
 
 appendChild: anElement
-	"In IE7 and IE8 appendChild fails on several node types. So we need to check"
-	<inlineJS: 'var element=$self.element;
-	if (null == element.canHaveChildren || element.canHaveChildren) {
-		element.appendChild(anElement);
-	} else {
-		element.text = String(element.text) + anElement.innerHTML;
-	}'>
+	element appendChild: anElement
 !
 
 appendString: aString