equal
deleted
inserted
replaced
1562 text := revInfo at:#directory ifAbsent:(pckgInfo at:#directory ifAbsent:nil). |
1562 text := revInfo at:#directory ifAbsent:(pckgInfo at:#directory ifAbsent:nil). |
1563 text isNil ifTrue:[ |
1563 text isNil ifTrue:[ |
1564 path := revInfo at:#repositoryPathName ifAbsent:(pckgInfo at:#repositoryPathName ifAbsent:nil). |
1564 path := revInfo at:#repositoryPathName ifAbsent:(pckgInfo at:#repositoryPathName ifAbsent:nil). |
1565 path notNil ifTrue:[ |
1565 path notNil ifTrue:[ |
1566 SourceCodeManager notNil ifTrue:[ |
1566 SourceCodeManager notNil ifTrue:[ |
1567 text := SourceCodeManager directoryFromContainerPath:path. |
1567 text := SourceCodeManager directoryFromContainerPath:path forClass:aClass. |
1568 ]. |
1568 ]. |
1569 text isNil ifTrue:[text := '?']. |
1569 text isNil ifTrue:[text := '?']. |
1570 ] ifFalse:[ |
1570 ] ifFalse:[ |
1571 text := '?' |
1571 text := '?' |
1572 ] |
1572 ] |
1576 text := revInfo at:#module ifAbsent:(pckgInfo at:#module ifAbsent:nil). |
1576 text := revInfo at:#module ifAbsent:(pckgInfo at:#module ifAbsent:nil). |
1577 text isNil ifTrue:[ |
1577 text isNil ifTrue:[ |
1578 path := revInfo at:#repositoryPathName ifAbsent:(pckgInfo at:#repositoryPathName ifAbsent:nil). |
1578 path := revInfo at:#repositoryPathName ifAbsent:(pckgInfo at:#repositoryPathName ifAbsent:nil). |
1579 path notNil ifTrue:[ |
1579 path notNil ifTrue:[ |
1580 SourceCodeManager notNil ifTrue:[ |
1580 SourceCodeManager notNil ifTrue:[ |
1581 text := SourceCodeManager moduleFromContainerPath:path. |
1581 text := SourceCodeManager moduleFromContainerPath:path forClass:aClass. |
1582 ]. |
1582 ]. |
1583 text isNil ifTrue:[text := '?']. |
1583 text isNil ifTrue:[text := '?']. |
1584 ] ifFalse:[ |
1584 ] ifFalse:[ |
1585 text := '?' |
1585 text := '?' |
1586 ] |
1586 ] |
2424 ! ! |
2424 ! ! |
2425 |
2425 |
2426 !HTMLDocGenerator class methodsFor:'documentation'! |
2426 !HTMLDocGenerator class methodsFor:'documentation'! |
2427 |
2427 |
2428 version |
2428 version |
2429 ^ '$Header: /cvs/stx/stx/libbasic3/HTMLDocGenerator.st,v 1.69 2003-11-10 16:12:22 cg Exp $' |
2429 ^ '$Header: /cvs/stx/stx/libbasic3/HTMLDocGenerator.st,v 1.70 2003-11-13 11:29:35 cg Exp $' |
2430 ! ! |
2430 ! ! |