|  | @@ -966,7 +966,7 @@ fn: function (aTextarea){
 | 
	
		
			
				|  |  |  var self=this;
 | 
	
		
			
				|  |  |  return smalltalk.withContext(function($ctx1) { 
 | 
	
		
			
				|  |  |  self['@editor'] = CodeMirror.fromTextArea(aTextarea, {
 | 
	
		
			
				|  |  | -		theme: 'amber',
 | 
	
		
			
				|  |  | +		theme: 'default',
 | 
	
		
			
				|  |  |  				lineNumbers: true,
 | 
	
		
			
				|  |  |  				enterMode: 'flat',
 | 
	
		
			
				|  |  |  				indentWithTabs: true,
 | 
	
	
		
			
				|  | @@ -976,7 +976,7 @@ self['@editor'] = CodeMirror.fromTextArea(aTextarea, {
 | 
	
		
			
				|  |  |  	});
 | 
	
		
			
				|  |  |  return self}, function($ctx1) {$ctx1.fill(self,"setEditorOn:",{aTextarea:aTextarea},smalltalk.SourceArea)})},
 | 
	
		
			
				|  |  |  args: ["aTextarea"],
 | 
	
		
			
				|  |  | -source: "setEditorOn: aTextarea\x0a\x09<self['@editor'] = CodeMirror.fromTextArea(aTextarea, {\x0a\x09\x09theme: 'amber',\x0a\x09\x09\x09\x09lineNumbers: true,\x0a\x09\x09\x09\x09enterMode: 'flat',\x0a\x09\x09\x09\x09indentWithTabs: true,\x0a\x09\x09\x09\x09indentUnit: 4,\x0a\x09\x09\x09\x09matchBrackets: true,\x0a\x09\x09\x09\x09electricChars: false\x0a\x09})>",
 | 
	
		
			
				|  |  | +source: "setEditorOn: aTextarea\x0a\x09<self['@editor'] = CodeMirror.fromTextArea(aTextarea, {\x0a\x09\x09theme: 'default',\x0a\x09\x09\x09\x09lineNumbers: true,\x0a\x09\x09\x09\x09enterMode: 'flat',\x0a\x09\x09\x09\x09indentWithTabs: true,\x0a\x09\x09\x09\x09indentUnit: 4,\x0a\x09\x09\x09\x09matchBrackets: true,\x0a\x09\x09\x09\x09electricChars: false\x0a\x09})>",
 | 
	
		
			
				|  |  |  messageSends: [],
 | 
	
		
			
				|  |  |  referencedClasses: []
 | 
	
		
			
				|  |  |  }),
 | 
	
	
		
			
				|  | @@ -7395,27 +7395,21 @@ var $1;
 | 
	
		
			
				|  |  |  variables=_st($Dictionary())._new();
 | 
	
		
			
				|  |  |  _st(variables)._at_put_("#self",self);
 | 
	
		
			
				|  |  |  $ctx1.sendIdx["at:put:"]=1;
 | 
	
		
			
				|  |  | -_st(variables)._at_put_("#home",self._home());
 | 
	
		
			
				|  |  | +_st(variables)._at_put_("#keys",self._keys());
 | 
	
		
			
				|  |  |  $ctx1.sendIdx["at:put:"]=2;
 | 
	
		
			
				|  |  | -_st(variables)._at_put_("#receiver",self._receiver());
 | 
	
		
			
				|  |  | -$ctx1.sendIdx["at:put:"]=3;
 | 
	
		
			
				|  |  | -_st(variables)._at_put_("#selector",self._selector());
 | 
	
		
			
				|  |  | -$ctx1.sendIdx["at:put:"]=4;
 | 
	
		
			
				|  |  | -_st(variables)._at_put_("#temps",self._temps());
 | 
	
		
			
				|  |  | -$ctx1.sendIdx["at:put:"]=5;
 | 
	
		
			
				|  |  | -_st(_st(self._class())._instanceVariableNames())._do_((function(each){
 | 
	
		
			
				|  |  | +self._keysAndValuesDo_((function(key,value){
 | 
	
		
			
				|  |  |  return smalltalk.withContext(function($ctx2) {
 | 
	
		
			
				|  |  | -return _st(variables)._at_put_(each,self._instVarAt_(each));
 | 
	
		
			
				|  |  | -}, function($ctx2) {$ctx2.fillBlock({each:each},$ctx1,1)})}));
 | 
	
		
			
				|  |  | +return _st(variables)._at_put_(key,value);
 | 
	
		
			
				|  |  | +}, function($ctx2) {$ctx2.fillBlock({key:key,value:value},$ctx1,1)})}));
 | 
	
		
			
				|  |  |  _st(anInspector)._setLabel_(self._printString());
 | 
	
		
			
				|  |  |  $1=_st(anInspector)._setVariables_(variables);
 | 
	
		
			
				|  |  | -return self}, function($ctx1) {$ctx1.fill(self,"inspectOn:",{anInspector:anInspector,variables:variables},smalltalk.MethodContext)})},
 | 
	
		
			
				|  |  | +return self}, function($ctx1) {$ctx1.fill(self,"inspectOn:",{anInspector:anInspector,variables:variables},smalltalk.AssociativeCollection)})},
 | 
	
		
			
				|  |  |  args: ["anInspector"],
 | 
	
		
			
				|  |  | -source: "inspectOn: anInspector\x0a\x09| variables |\x0a\x09variables := Dictionary new.\x0a\x09variables at: '#self' put: self.\x0a\x09variables at: '#home' put: self home.\x0a\x09variables at: '#receiver' put: self receiver.\x0a\x09variables at: '#selector' put: self selector.\x0a\x09variables at: '#temps' put: self temps.\x0a\x09self class instanceVariableNames do: [ :each |\x0a\x09\x09variables at: each put: (self instVarAt: each) ].\x0a\x09anInspector\x0a\x09\x09setLabel: self printString;\x0a\x09\x09setVariables: variables",
 | 
	
		
			
				|  |  | -messageSends: ["new", "at:put:", "home", "receiver", "selector", "temps", "do:", "instanceVariableNames", "class", "instVarAt:", "setLabel:", "printString", "setVariables:"],
 | 
	
		
			
				|  |  | +source: "inspectOn: anInspector\x0a\x09| variables |\x0a\x09variables := Dictionary new.\x0a\x09variables at: '#self' put: self.\x0a\x09variables at: '#keys' put: self keys.\x0a\x09self keysAndValuesDo: [ :key :value |\x0a\x09\x09variables at: key put: value ].\x0a\x09anInspector\x0a\x09\x09setLabel: self printString;\x0a\x09\x09setVariables: variables",
 | 
	
		
			
				|  |  | +messageSends: ["new", "at:put:", "keys", "keysAndValuesDo:", "setLabel:", "printString", "setVariables:"],
 | 
	
		
			
				|  |  |  referencedClasses: ["Dictionary"]
 | 
	
		
			
				|  |  |  }),
 | 
	
		
			
				|  |  | -smalltalk.MethodContext);
 | 
	
		
			
				|  |  | +smalltalk.AssociativeCollection);
 | 
	
		
			
				|  |  |  
 | 
	
		
			
				|  |  |  smalltalk.addMethod(
 | 
	
		
			
				|  |  |  smalltalk.method({
 | 
	
	
		
			
				|  | @@ -7423,28 +7417,29 @@ selector: "inspectOn:",
 | 
	
		
			
				|  |  |  protocol: '*IDE',
 | 
	
		
			
				|  |  |  fn: function (anInspector){
 | 
	
		
			
				|  |  |  var self=this;
 | 
	
		
			
				|  |  | -var variables;
 | 
	
		
			
				|  |  | +var variables,i;
 | 
	
		
			
				|  |  |  function $Dictionary(){return smalltalk.Dictionary||(typeof Dictionary=="undefined"?nil:Dictionary)}
 | 
	
		
			
				|  |  |  return smalltalk.withContext(function($ctx1) { 
 | 
	
		
			
				|  |  |  var $1;
 | 
	
		
			
				|  |  |  variables=_st($Dictionary())._new();
 | 
	
		
			
				|  |  |  _st(variables)._at_put_("#self",self);
 | 
	
		
			
				|  |  |  $ctx1.sendIdx["at:put:"]=1;
 | 
	
		
			
				|  |  | -_st(variables)._at_put_("#keys",self._keys());
 | 
	
		
			
				|  |  | -$ctx1.sendIdx["at:put:"]=2;
 | 
	
		
			
				|  |  | -self._keysAndValuesDo_((function(key,value){
 | 
	
		
			
				|  |  | +i=(1);
 | 
	
		
			
				|  |  | +self._do_((function(each){
 | 
	
		
			
				|  |  |  return smalltalk.withContext(function($ctx2) {
 | 
	
		
			
				|  |  | -return _st(variables)._at_put_(key,value);
 | 
	
		
			
				|  |  | -}, function($ctx2) {$ctx2.fillBlock({key:key,value:value},$ctx1,1)})}));
 | 
	
		
			
				|  |  | +_st(variables)._at_put_(i,each);
 | 
	
		
			
				|  |  | +i=_st(i).__plus((1));
 | 
	
		
			
				|  |  | +return i;
 | 
	
		
			
				|  |  | +}, function($ctx2) {$ctx2.fillBlock({each:each},$ctx1,1)})}));
 | 
	
		
			
				|  |  |  _st(anInspector)._setLabel_(self._printString());
 | 
	
		
			
				|  |  |  $1=_st(anInspector)._setVariables_(variables);
 | 
	
		
			
				|  |  | -return self}, function($ctx1) {$ctx1.fill(self,"inspectOn:",{anInspector:anInspector,variables:variables},smalltalk.AssociativeCollection)})},
 | 
	
		
			
				|  |  | +return self}, function($ctx1) {$ctx1.fill(self,"inspectOn:",{anInspector:anInspector,variables:variables,i:i},smalltalk.Set)})},
 | 
	
		
			
				|  |  |  args: ["anInspector"],
 | 
	
		
			
				|  |  | -source: "inspectOn: anInspector\x0a\x09| variables |\x0a\x09variables := Dictionary new.\x0a\x09variables at: '#self' put: self.\x0a\x09variables at: '#keys' put: self keys.\x0a\x09self keysAndValuesDo: [ :key :value |\x0a\x09\x09variables at: key put: value ].\x0a\x09anInspector\x0a\x09\x09setLabel: self printString;\x0a\x09\x09setVariables: variables",
 | 
	
		
			
				|  |  | -messageSends: ["new", "at:put:", "keys", "keysAndValuesDo:", "setLabel:", "printString", "setVariables:"],
 | 
	
		
			
				|  |  | +source: "inspectOn: anInspector\x0a\x09| variables i |\x0a\x09variables := Dictionary new.\x0a\x09variables at: '#self' put: self.\x0a\x09i := 1.\x0a\x09self do: [ :each |\x0a\x09\x09variables at: i put: each.\x0a\x09\x09i := i + 1 ].\x0a\x09anInspector\x0a\x09\x09setLabel: self printString;\x0a\x09\x09setVariables: variables",
 | 
	
		
			
				|  |  | +messageSends: ["new", "at:put:", "do:", "+", "setLabel:", "printString", "setVariables:"],
 | 
	
		
			
				|  |  |  referencedClasses: ["Dictionary"]
 | 
	
		
			
				|  |  |  }),
 | 
	
		
			
				|  |  | -smalltalk.AssociativeCollection);
 | 
	
		
			
				|  |  | +smalltalk.Set);
 | 
	
		
			
				|  |  |  
 | 
	
		
			
				|  |  |  smalltalk.addMethod(
 | 
	
		
			
				|  |  |  smalltalk.method({
 | 
	
	
		
			
				|  | @@ -7452,28 +7447,33 @@ selector: "inspectOn:",
 | 
	
		
			
				|  |  |  protocol: '*IDE',
 | 
	
		
			
				|  |  |  fn: function (anInspector){
 | 
	
		
			
				|  |  |  var self=this;
 | 
	
		
			
				|  |  | -var variables,i;
 | 
	
		
			
				|  |  | +var variables;
 | 
	
		
			
				|  |  |  function $Dictionary(){return smalltalk.Dictionary||(typeof Dictionary=="undefined"?nil:Dictionary)}
 | 
	
		
			
				|  |  |  return smalltalk.withContext(function($ctx1) { 
 | 
	
		
			
				|  |  |  var $1;
 | 
	
		
			
				|  |  |  variables=_st($Dictionary())._new();
 | 
	
		
			
				|  |  |  _st(variables)._at_put_("#self",self);
 | 
	
		
			
				|  |  |  $ctx1.sendIdx["at:put:"]=1;
 | 
	
		
			
				|  |  | -i=(1);
 | 
	
		
			
				|  |  | -self._do_((function(each){
 | 
	
		
			
				|  |  | +_st(variables)._at_put_("#home",self._home());
 | 
	
		
			
				|  |  | +$ctx1.sendIdx["at:put:"]=2;
 | 
	
		
			
				|  |  | +_st(variables)._at_put_("#receiver",self._receiver());
 | 
	
		
			
				|  |  | +$ctx1.sendIdx["at:put:"]=3;
 | 
	
		
			
				|  |  | +_st(variables)._at_put_("#selector",self._selector());
 | 
	
		
			
				|  |  | +$ctx1.sendIdx["at:put:"]=4;
 | 
	
		
			
				|  |  | +_st(variables)._at_put_("#temps",self._temps());
 | 
	
		
			
				|  |  | +$ctx1.sendIdx["at:put:"]=5;
 | 
	
		
			
				|  |  | +_st(_st(self._class())._instanceVariableNames())._do_((function(each){
 | 
	
		
			
				|  |  |  return smalltalk.withContext(function($ctx2) {
 | 
	
		
			
				|  |  | -_st(variables)._at_put_(i,each);
 | 
	
		
			
				|  |  | -i=_st(i).__plus((1));
 | 
	
		
			
				|  |  | -return i;
 | 
	
		
			
				|  |  | +return _st(variables)._at_put_(each,self._instVarAt_(each));
 | 
	
		
			
				|  |  |  }, function($ctx2) {$ctx2.fillBlock({each:each},$ctx1,1)})}));
 | 
	
		
			
				|  |  |  _st(anInspector)._setLabel_(self._printString());
 | 
	
		
			
				|  |  |  $1=_st(anInspector)._setVariables_(variables);
 | 
	
		
			
				|  |  | -return self}, function($ctx1) {$ctx1.fill(self,"inspectOn:",{anInspector:anInspector,variables:variables,i:i},smalltalk.Set)})},
 | 
	
		
			
				|  |  | +return self}, function($ctx1) {$ctx1.fill(self,"inspectOn:",{anInspector:anInspector,variables:variables},smalltalk.MethodContext)})},
 | 
	
		
			
				|  |  |  args: ["anInspector"],
 | 
	
		
			
				|  |  | -source: "inspectOn: anInspector\x0a\x09| variables i |\x0a\x09variables := Dictionary new.\x0a\x09variables at: '#self' put: self.\x0a\x09i := 1.\x0a\x09self do: [ :each |\x0a\x09\x09variables at: i put: each.\x0a\x09\x09i := i + 1 ].\x0a\x09anInspector\x0a\x09\x09setLabel: self printString;\x0a\x09\x09setVariables: variables",
 | 
	
		
			
				|  |  | -messageSends: ["new", "at:put:", "do:", "+", "setLabel:", "printString", "setVariables:"],
 | 
	
		
			
				|  |  | +source: "inspectOn: anInspector\x0a\x09| variables |\x0a\x09variables := Dictionary new.\x0a\x09variables at: '#self' put: self.\x0a\x09variables at: '#home' put: self home.\x0a\x09variables at: '#receiver' put: self receiver.\x0a\x09variables at: '#selector' put: self selector.\x0a\x09variables at: '#temps' put: self temps.\x0a\x09self class instanceVariableNames do: [ :each |\x0a\x09\x09variables at: each put: (self instVarAt: each) ].\x0a\x09anInspector\x0a\x09\x09setLabel: self printString;\x0a\x09\x09setVariables: variables",
 | 
	
		
			
				|  |  | +messageSends: ["new", "at:put:", "home", "receiver", "selector", "temps", "do:", "instanceVariableNames", "class", "instVarAt:", "setLabel:", "printString", "setVariables:"],
 | 
	
		
			
				|  |  |  referencedClasses: ["Dictionary"]
 | 
	
		
			
				|  |  |  }),
 | 
	
		
			
				|  |  | -smalltalk.Set);
 | 
	
		
			
				|  |  | +smalltalk.MethodContext);
 | 
	
		
			
				|  |  |  
 | 
	
		
			
				|  |  |  });
 |