equal
deleted
inserted
replaced
1671 <return: ChangeSet|nil> |
1671 <return: ChangeSet|nil> |
1672 " |
1672 " |
1673 |
1673 |
1674 |theSourceCodeManager theSourceStream theChangeSet| |
1674 |theSourceCodeManager theSourceStream theChangeSet| |
1675 |
1675 |
1676 theSourceCodeManager := aClass sourceCodeManager. |
1676 theSourceCodeManager := SourceCodeManagerUtilities sourceCodeManagerFor:aClass. |
1677 [ |
1677 [ |
1678 theSourceStream := theSourceCodeManager getSourceStreamFor:aClass revision:aVersion. |
1678 theSourceStream := theSourceCodeManager getSourceStreamFor:aClass revision:aVersion. |
1679 theSourceStream notNil |
1679 theSourceStream notNil |
1680 ifTrue:[theChangeSet := ChangeSet fromStream:theSourceStream] |
1680 ifTrue:[theChangeSet := ChangeSet fromStream:theSourceStream] |
1681 ] ensure:[ |
1681 ] ensure:[ |
1682 theSourceStream notNil ifTrue:[theSourceStream close] |
1682 theSourceStream notNil ifTrue:[theSourceStream close] |
1683 ]. |
1683 ]. |
1684 ^theChangeSet |
1684 ^theChangeSet |
|
1685 |
|
1686 "Modified: / 12-09-2006 / 14:24:51 / cg" |
1685 ! |
1687 ! |
1686 |
1688 |
1687 changeSetForClass:aClass andSource:aSource |
1689 changeSetForClass:aClass andSource:aSource |
1688 "return a ChangeSet for the class aClass and source aSource. |
1690 "return a ChangeSet for the class aClass and source aSource. |
1689 The source is converted to a stream and then the change set is generated |
1691 The source is converted to a stream and then the change set is generated |
1975 ! ! |
1977 ! ! |
1976 |
1978 |
1977 !VersionDiffBrowser class methodsFor:'documentation'! |
1979 !VersionDiffBrowser class methodsFor:'documentation'! |
1978 |
1980 |
1979 version |
1981 version |
1980 ^ '$Header: /cvs/stx/stx/libtool/VersionDiffBrowser.st,v 1.73 2006-07-25 09:16:48 cg Exp $' |
1982 ^ '$Header: /cvs/stx/stx/libtool/VersionDiffBrowser.st,v 1.74 2006-09-12 12:27:23 cg Exp $' |
1981 ! ! |
1983 ! ! |