Move String >> htmlTextContent to Platform-DOM; tests.

src/Platform-DOM-Tests.js

@@ -0,0 +1,67 @@
+define(["amber/boot", "amber_core/SUnit"], function($boot){"use strict";
+if(!$boot.nilAsReceiver)$boot.nilAsReceiver=$boot.nil;
+var $core=$boot.api,nil=$boot.nilAsReceiver,$recv=$boot.asReceiver,$globals=$boot.globals;
+if(!$boot.nilAsClass)$boot.nilAsClass=$boot.dnu;
+$core.addPackage('Platform-DOM-Tests');
+$core.packages["Platform-DOM-Tests"].innerEval = function (expr) { return eval(expr); };
+$core.packages["Platform-DOM-Tests"].transport = {"type":"amd","amdNamespace":"amber_core"};
+
+$core.addClass('PlatformDomTest', $globals.TestCase, ['fixtureDiv'], 'Platform-DOM-Tests');
+$core.addMethod(
+$core.method({
+selector: "testEntityConversion",
+protocol: 'testing',
+fn: function (){
+var self=this;
+//>>excludeStart("ctx", pragmas.excludeDebugContexts);
+return $core.withContext(function($ctx1) {
+//>>excludeEnd("ctx");
+self._assert_equals_("©"._htmlTextContent(),"©");
+return self;
+//>>excludeStart("ctx", pragmas.excludeDebugContexts);
+}, function($ctx1) {$ctx1.fill(self,"testEntityConversion",{},$globals.PlatformDomTest)});
+//>>excludeEnd("ctx");
+},
+//>>excludeStart("ide", pragmas.excludeIdeData);
+args: [],
+source: "testEntityConversion\x0a\x09self assert: '©' htmlTextContent equals: '©'",
+referencedClasses: [],
+//>>excludeEnd("ide");
+messageSends: ["assert:equals:", "htmlTextContent"]
+}),
+$globals.PlatformDomTest);
+
+$core.addMethod(
+$core.method({
+selector: "testTextContentDoesNotRunScript",
+protocol: 'testing',
+fn: function (){
+var self=this;
+//>>excludeStart("ctx", pragmas.excludeDebugContexts);
+return $core.withContext(function($ctx1) {
+//>>excludeEnd("ctx");
+self._shouldnt_raise_((function(){
+//>>excludeStart("ctx", pragmas.excludeDebugContexts);
+return $core.withContext(function($ctx2) {
+//>>excludeEnd("ctx");
+return "<script>throw new Error(\x22Intentional\x22)</script>"._htmlTextContent();
+//>>excludeStart("ctx", pragmas.excludeDebugContexts);
+}, function($ctx2) {$ctx2.fillBlock({},$ctx1,1)});
+//>>excludeEnd("ctx");
+}),$globals.Error);
+return self;
+//>>excludeStart("ctx", pragmas.excludeDebugContexts);
+}, function($ctx1) {$ctx1.fill(self,"testTextContentDoesNotRunScript",{},$globals.PlatformDomTest)});
+//>>excludeEnd("ctx");
+},
+//>>excludeStart("ide", pragmas.excludeIdeData);
+args: [],
+source: "testTextContentDoesNotRunScript\x0a\x09self shouldnt: [ '<script>throw new Error(\x22Intentional\x22)</script>' htmlTextContent ] raise: Error",
+referencedClasses: ["Error"],
+//>>excludeEnd("ide");
+messageSends: ["shouldnt:raise:", "htmlTextContent"]
+}),
+$globals.PlatformDomTest);
+
+
+});

src/Platform-DOM-Tests.st

@@ -0,0 +1,15 @@
+Smalltalk createPackage: 'Platform-DOM-Tests'!
+TestCase subclass: #PlatformDomTest
+	instanceVariableNames: 'fixtureDiv'
+	package: 'Platform-DOM-Tests'!
+
+!PlatformDomTest methodsFor: 'testing'!
+
+testEntityConversion
+	self assert: '©' htmlTextContent equals: '©'
+!
+
+testTextContentDoesNotRunScript
+	self shouldnt: [ '<script>throw new Error("Intentional")</script>' htmlTextContent ] raise: Error
+! !
+

support/devel.js

@@ -9,6 +9,7 @@ define([
     'amber_core/SUnit',
     'amber_core/Compiler-Tests',
     'amber_core/Kernel-Tests',
+    'amber_core/Platform-DOM-Tests',
     'amber_core/SUnit-Tests'
     // --- packages of the development only Amber end here ---
 ], function (amber) { return amber; });