- do not use Smalltalk compiler, but the compiler of the class

astares · Nov 7, 2019 · ef0e95b · ef0e95b
1 parent 26501aa
commit ef0e95b
Show file tree

Hide file tree

Showing 2 changed files with 2 additions and 4 deletions.
diff --git a/src/NECompletion/CompletionContext.class.st b/src/NECompletion/CompletionContext.class.st
@@ -56,10 +56,9 @@ CompletionContext >> narrowWith: aString [
 
 { #category : #parsing }
 CompletionContext >> parseSource [
-	 ast := Smalltalk compiler
+	 ast := class compiler
 				source: source;
 				options: #(+ optionParseErrors + optionSkipSemanticWarnings);
-				class: class;
 				noPattern: isWorkspace;
 				parse.
 	ast doSemanticAnalysisIn: class.

diff --git a/src/Shout/SHRBTextStyler.class.st b/src/Shout/SHRBTextStyler.class.st
@@ -971,10 +971,9 @@ SHRBTextStyler >> pixelHeight [
 { #category : #private }
 SHRBTextStyler >> privateStyle: aText [
 	| ast |
-	ast := Smalltalk compiler
+	ast := classOrMetaClass compiler
 				source: aText;
 				options: #(+ optionParseErrors + optionSkipSemanticWarnings);
-				class: classOrMetaClass;
 				noPattern: self isForWorkspace;
 				requestor: workspace;
 				parse.