Fixes Environment >> removeMethod:

js/Kernel-Objects.deploy.js

@@ -1791,9 +1791,9 @@ selector: "removeMethod:",
 fn: function (aMethod){
 var self=this;
 return smalltalk.withContext(function($ctx1) { 
-_st(_st(aMethod)._methodClass())._forsakeMethod_(aMethod);
-return self}, function($ctx1) {$ctx1.fill(self,"removeMethod:",{aMethod:aMethod},smalltalk.HLEnvironment)})},
-messageSends: ["forsakeMethod:", "methodClass"]}),
+_st(_st(aMethod)._methodClass())._removeCompiledMethod_(aMethod);
+return self}, function($ctx1) {$ctx1.fill(self,"removeMethod:",{aMethod:aMethod},smalltalk.Environment)})},
+messageSends: ["removeCompiledMethod:", "methodClass"]}),
 smalltalk.Environment);
 
 smalltalk.addMethod(

js/Kernel-Objects.js

@@ -2476,11 +2476,11 @@ category: 'actions',
 fn: function (aMethod){
 var self=this;
 return smalltalk.withContext(function($ctx1) { 
-_st(_st(aMethod)._methodClass())._forsakeMethod_(aMethod);
-return self}, function($ctx1) {$ctx1.fill(self,"removeMethod:",{aMethod:aMethod},smalltalk.HLEnvironment)})},
+_st(_st(aMethod)._methodClass())._removeCompiledMethod_(aMethod);
+return self}, function($ctx1) {$ctx1.fill(self,"removeMethod:",{aMethod:aMethod},smalltalk.Environment)})},
 args: ["aMethod"],
-source: "removeMethod: aMethod\x0a\x09aMethod methodClass forsakeMethod: aMethod",
-messageSends: ["forsakeMethod:", "methodClass"],
+source: "removeMethod: aMethod\x0a\x09aMethod methodClass removeCompiledMethod: aMethod",
+messageSends: ["removeCompiledMethod:", "methodClass"],
 referencedClasses: []
 }),
 smalltalk.Environment);

st/Kernel-Objects.st

@@ -756,7 +756,7 @@ removeClass: aClass
 !
 
 removeMethod: aMethod
-	aMethod methodClass forsakeMethod: aMethod
+	aMethod methodClass removeCompiledMethod: aMethod
 !
 
 renameClass: aClass to: aClassName