equal
deleted
inserted
replaced
3330 "opens documentation for the selected widget" |
3330 "opens documentation for the selected widget" |
3331 |
3331 |
3332 |spec document| |
3332 |spec document| |
3333 |
3333 |
3334 (spec := self specForSelection) isNil ifTrue:[ |
3334 (spec := self specForSelection) isNil ifTrue:[ |
3335 treeView isCanvasSelected ifTrue:[ |
3335 treeView isCanvasSelected ifTrue:[ |
3336 spec := nil |
3336 spec := nil |
3337 ] |
3337 ] |
3338 ]. |
3338 ]. |
3339 spec notNil ifTrue:[ |
3339 spec notNil ifTrue:[ |
3340 document := 'tools/uipainter/', spec userFriendlyName,'.html' |
3340 document := 'tools/uipainter/', spec documentFileName,'.html' |
3341 ] ifFalse: [ |
3341 ] ifFalse: [ |
3342 document := 'tools/uipainter/WindowSpec.html' |
3342 document := 'tools/uipainter/WindowSpec.html' |
3343 ]. |
3343 ]. |
3344 HTMLDocumentView openFullOnDocumentationFile: document |
3344 HTMLDocumentView openFullOnDocumentationFile: document |
3345 |
3345 |
3346 |
3346 |
3347 ! |
3347 ! |