Browse Source

Fix a typo

Nicolas Petton 10 years ago
parent
commit
ceff155d43
2 changed files with 8 additions and 6 deletions
  1. 6 5
      src/Helios-Workspace.js
  2. 2 1
      src/Helios-Workspace.st

+ 6 - 5
src/Helios-Workspace.js

@@ -239,7 +239,7 @@ var $early={};
 try {
 result=_st((function(){
 return smalltalk.withContext(function($ctx2) {
-return self._dotIt();
+return self._doIt();
 }, function($ctx2) {$ctx2.fillBlock({},$ctx1,1)})}))._on_do_($Error(),(function(exception){
 return smalltalk.withContext(function($ctx2) {
 $1=_st($ErrorHandler())._handleError_(exception);
@@ -250,8 +250,8 @@ return self}
 catch(e) {if(e===$early)return e[0]; throw e}
 }, function($ctx1) {$ctx1.fill(self,"browseIt",{result:result},globals.HLCodeWidget)})},
 args: [],
-source: "browseIt\x0a\x09| result |\x0a\x09\x0a\x09result := [ self dotIt ] on: Error do: [ :exception | \x0a\x09\x09^ ErrorHandler handleError: exception ].\x0a\x09\x09\x0a\x09self model browse: result",
-messageSends: ["on:do:", "dotIt", "handleError:", "browse:", "model"],
+source: "browseIt\x0a\x09| result |\x0a\x09\x0a\x09result := [ self doIt ] on: Error do: [ :exception | \x0a\x09\x09^ ErrorHandler handleError: exception ].\x0a\x09\x09\x0a\x09self model browse: result",
+messageSends: ["on:do:", "doIt", "handleError:", "browse:", "model"],
 referencedClasses: ["Error", "ErrorHandler"]
 }),
 globals.HLCodeWidget);
@@ -672,6 +672,7 @@ return _st($Smalltalk())._parse_(_st(self._editor())._getValue());
 throw $early=[self];
 }));
 node=_st(ast)._atPosition_(aPosition);
+_st(console)._log_(node);
 $1=node;
 if(($receiver = $1) == nil || $receiver == null){
 return self;
@@ -686,8 +687,8 @@ return self}
 catch(e) {if(e===$early)return e[0]; throw e}
 }, function($ctx1) {$ctx1.fill(self,"onCtrlClickAt:",{aPosition:aPosition,ast:ast,node:node},globals.HLCodeWidget)})},
 args: ["aPosition"],
-source: "onCtrlClickAt: aPosition\x0a\x09| ast node |\x0a\x09\x0a\x09ast := [ Smalltalk parse: self editor getValue ] \x0a\x09\x09on: Error \x0a\x09\x09do: [ :error | ^ self ].\x0a\x09\x0a\x09node := (ast atPosition: aPosition).\x0a\x09node ifNil: [ ^ self ].\x0a\x09\x0a\x09node isNavigationNode ifTrue: [ \x0a\x09\x09self navigateTo: node navigationLink ]",
-messageSends: ["on:do:", "parse:", "getValue", "editor", "atPosition:", "ifNil:", "ifTrue:", "isNavigationNode", "navigateTo:", "navigationLink"],
+source: "onCtrlClickAt: aPosition\x0a\x09| ast node |\x0a\x09\x0a\x09ast := [ Smalltalk parse: self editor getValue ] \x0a\x09\x09on: Error \x0a\x09\x09do: [ :error | ^ self ].\x0a\x09\x0a\x09node := (ast atPosition: aPosition).\x0a\x09console log: node.\x0a\x09node ifNil: [ ^ self ].\x0a\x09\x0a\x09node isNavigationNode ifTrue: [ \x0a\x09\x09self navigateTo: node navigationLink ]",
+messageSends: ["on:do:", "parse:", "getValue", "editor", "atPosition:", "log:", "ifNil:", "ifTrue:", "isNavigationNode", "navigateTo:", "navigationLink"],
 referencedClasses: ["Smalltalk", "Error"]
 }),
 globals.HLCodeWidget);

+ 2 - 1
src/Helios-Workspace.st

@@ -151,7 +151,7 @@ selectionStart: anInteger
 browseIt
 	| result |
 	
-	result := [ self dotIt ] on: Error do: [ :exception | 
+	result := [ self doIt ] on: Error do: [ :exception | 
 		^ ErrorHandler handleError: exception ].
 		
 	self model browse: result
@@ -274,6 +274,7 @@ onCtrlClickAt: aPosition
 		do: [ :error | ^ self ].
 	
 	node := (ast atPosition: aPosition).
+	console log: node.
 	node ifNil: [ ^ self ].
 	
 	node isNavigationNode ifTrue: [