equal
deleted
inserted
replaced
142 ! |
142 ! |
143 |
143 |
144 codeAspect:aSymbolOrNil |
144 codeAspect:aSymbolOrNil |
145 "set the codeAspect; a symbol describing what is shown in the codeView" |
145 "set the codeAspect; a symbol describing what is shown in the codeView" |
146 |
146 |
|
147 |cv| |
|
148 |
147 codeAspect := aSymbolOrNil. |
149 codeAspect := aSymbolOrNil. |
148 codeView codeAspect: aSymbolOrNil |
150 (cv := self codeView) notNil ifTrue:[ |
|
151 cv codeAspect: aSymbolOrNil |
|
152 ]. |
149 |
153 |
150 "Created: / 11-02-2000 / 12:43:45 / cg" |
154 "Created: / 11-02-2000 / 12:43:45 / cg" |
151 "Modified: / 27-09-2013 / 09:59:04 / Jan Vrany <jan.vrany@fit.cvut.cz>" |
155 "Modified: / 27-09-2013 / 09:59:04 / Jan Vrany <jan.vrany@fit.cvut.cz>" |
152 ! |
156 ! |
153 |
157 |
1688 ! ! |
1692 ! ! |
1689 |
1693 |
1690 !NavigationState class methodsFor:'documentation'! |
1694 !NavigationState class methodsFor:'documentation'! |
1691 |
1695 |
1692 version |
1696 version |
1693 ^ '$Header: /cvs/stx/stx/libtool/Tools_NavigationState.st,v 1.52 2013-09-27 09:30:01 vrany Exp $' |
1697 ^ '$Header: /cvs/stx/stx/libtool/Tools_NavigationState.st,v 1.53 2013-12-12 11:01:05 cg Exp $' |
1694 ! |
1698 ! |
1695 |
1699 |
1696 version_CVS |
1700 version_CVS |
1697 ^ '$Header: /cvs/stx/stx/libtool/Tools_NavigationState.st,v 1.52 2013-09-27 09:30:01 vrany Exp $' |
1701 ^ '$Header: /cvs/stx/stx/libtool/Tools_NavigationState.st,v 1.53 2013-12-12 11:01:05 cg Exp $' |
1698 ! |
1702 ! |
1699 |
1703 |
1700 version_SVN |
1704 version_SVN |
1701 ^ '$Id: Tools_NavigationState.st,v 1.52 2013-09-27 09:30:01 vrany Exp $' |
1705 ^ '$Id: Tools_NavigationState.st,v 1.53 2013-12-12 11:01:05 cg Exp $' |
1702 ! ! |
1706 ! ! |
1703 |
1707 |