equal
deleted
inserted
replaced
268 |
268 |
269 tmp := self explainSyntax:string short:shortText. |
269 tmp := self explainSyntax:string short:shortText. |
270 tmp notNil ifTrue:[ ^ tmp]. |
270 tmp notNil ifTrue:[ ^ tmp]. |
271 |
271 |
272 shortText ifTrue:[ |
272 shortText ifTrue:[ |
273 ^ '' |
273 ^ 'no explanation' |
274 ]. |
274 ]. |
275 |
275 |
276 parser isNil ifTrue:[ |
276 parser isNil ifTrue:[ |
277 ^ 'parse error - no explanation' |
277 ^ 'parse error - no explanation' |
278 ]. |
278 ]. |
863 ! ! |
863 ! ! |
864 |
864 |
865 !Explainer class methodsFor:'documentation'! |
865 !Explainer class methodsFor:'documentation'! |
866 |
866 |
867 version |
867 version |
868 ^ '$Header: /cvs/stx/stx/libcomp/Explainer.st,v 1.60 2003-06-12 11:08:56 cg Exp $' |
868 ^ '$Header: /cvs/stx/stx/libcomp/Explainer.st,v 1.61 2003-07-01 13:22:17 cg Exp $' |
869 ! ! |
869 ! ! |