equal
deleted
inserted
replaced
535 codeAspect:aSymbol |
535 codeAspect:aSymbol |
536 self assert: ({ SyntaxHighlighter codeAspectClassDefinition . |
536 self assert: ({ SyntaxHighlighter codeAspectClassDefinition . |
537 SyntaxHighlighter codeAspectExpression . |
537 SyntaxHighlighter codeAspectExpression . |
538 SyntaxHighlighter codeAspectMethod } includes:aSymbol ). |
538 SyntaxHighlighter codeAspectMethod } includes:aSymbol ). |
539 |
539 |
540 codeAspect := aSymbol. |
540 codeAspect ~~ aSymbol ifTrue:[ |
|
541 codeAspect := aSymbol. |
|
542 self update: #codeAspect with: codeAspect from: self. |
|
543 ] |
541 |
544 |
542 "Modified: / 27-07-2012 / 22:32:19 / cg" |
545 "Modified: / 27-07-2012 / 22:32:19 / cg" |
543 "Modified: / 22-10-2012 / 17:03:53 / Jan Vrany <jan.vrany@fit.cvut.cz>" |
546 "Modified: / 15-04-2013 / 23:02:03 / Jan Vrany <jan.vrany@fit.cvut.cz>" |
544 ! |
547 ! |
545 |
548 |
546 compilerClass |
549 compilerClass |
547 ^textView compilerClass |
550 ^textView compilerClass |
548 |
551 |