equal
deleted
inserted
replaced
1513 label := label copy at: firstCR put: Character space. |
1513 label := label copy at: firstCR put: Character space. |
1514 ] ifFalse:[ |
1514 ] ifFalse:[ |
1515 label := (label copyTo: firstCR - 1) , '...' |
1515 label := (label copyTo: firstCR - 1) , '...' |
1516 ]. |
1516 ]. |
1517 ]. |
1517 ]. |
1518 self removed ifTrue:[label := label asText colorizeAllWith: Color gray]. |
1518 self removed ifTrue:[label := label withColor: Color gray]. |
1519 ^label |
1519 ^label |
1520 |
1520 |
1521 "Created: / 05-11-2008 / 08:20:02 / Jan Vrany <vranyj1@fel.cvut.cz>" |
1521 "Created: / 05-11-2008 / 08:20:02 / Jan Vrany <vranyj1@fel.cvut.cz>" |
1522 "Modified: / 25-07-2009 / 23:43:23 / Jan Vrany <vranyj1@fel.cvut.cz>" |
1522 "Modified: / 25-07-2009 / 23:43:23 / Jan Vrany <vranyj1@fel.cvut.cz>" |
1523 "Modified: / 05-12-2009 / 14:46:00 / Jan Vrany <jan.vrany@fit.cvut.cz>" |
1523 "Modified: / 05-12-2009 / 14:46:00 / Jan Vrany <jan.vrany@fit.cvut.cz>" |
1686 ! ! |
1686 ! ! |
1687 |
1687 |
1688 !ChangeList class methodsFor:'documentation'! |
1688 !ChangeList class methodsFor:'documentation'! |
1689 |
1689 |
1690 version |
1690 version |
1691 ^ '$Header: /cvs/stx/stx/libtool/Tools__ChangeList.st,v 1.37 2015-02-26 01:06:39 cg Exp $' |
1691 ^ '$Header$' |
1692 ! |
1692 ! |
1693 |
1693 |
1694 version_CVS |
1694 version_CVS |
1695 ^ '$Header: /cvs/stx/stx/libtool/Tools__ChangeList.st,v 1.37 2015-02-26 01:06:39 cg Exp $' |
1695 ^ '$Header$' |
1696 ! |
1696 ! |
1697 |
1697 |
1698 version_HG |
1698 version_HG |
1699 |
1699 |
1700 ^ '$Changeset: <not expanded> $' |
1700 ^ '$Changeset: <not expanded> $' |
1701 ! |
1701 ! |
1702 |
1702 |
1703 version_SVN |
1703 version_SVN |
1704 ^ '$Id: Tools__ChangeList.st,v 1.37 2015-02-26 01:06:39 cg Exp $' |
1704 ^ '$Id$' |
1705 ! ! |
1705 ! ! |
1706 |
1706 |