equal
deleted
inserted
replaced
1482 label := label copy at: firstCR put: Character space. |
1482 label := label copy at: firstCR put: Character space. |
1483 ] ifFalse:[ |
1483 ] ifFalse:[ |
1484 label := (label copyTo: firstCR - 1) , '...' |
1484 label := (label copyTo: firstCR - 1) , '...' |
1485 ]. |
1485 ]. |
1486 ]. |
1486 ]. |
1487 self removed ifTrue:[label := label asText colorizeAllWith: Color gray]. |
1487 self removed ifTrue:[label := label withColor: Color gray]. |
1488 ^label |
1488 ^label |
1489 |
1489 |
1490 "Created: / 05-11-2008 / 08:20:02 / Jan Vrany <vranyj1@fel.cvut.cz>" |
1490 "Created: / 05-11-2008 / 08:20:02 / Jan Vrany <vranyj1@fel.cvut.cz>" |
1491 "Modified: / 25-07-2009 / 23:43:23 / Jan Vrany <vranyj1@fel.cvut.cz>" |
1491 "Modified: / 25-07-2009 / 23:43:23 / Jan Vrany <vranyj1@fel.cvut.cz>" |
1492 "Modified: / 05-12-2009 / 14:46:00 / Jan Vrany <jan.vrany@fit.cvut.cz>" |
1492 "Modified: / 05-12-2009 / 14:46:00 / Jan Vrany <jan.vrany@fit.cvut.cz>" |
1643 ! ! |
1643 ! ! |
1644 |
1644 |
1645 !ChangeList class methodsFor:'documentation'! |
1645 !ChangeList class methodsFor:'documentation'! |
1646 |
1646 |
1647 version |
1647 version |
1648 ^ '$Header: /cvs/stx/stx/libtool/Tools__ChangeList.st,v 1.37 2015-02-26 01:06:39 cg Exp $' |
1648 ^ '$Header$' |
1649 ! |
1649 ! |
1650 |
1650 |
1651 version_CVS |
1651 version_CVS |
1652 ^ '$Header: /cvs/stx/stx/libtool/Tools__ChangeList.st,v 1.37 2015-02-26 01:06:39 cg Exp $' |
1652 ^ '$Header$' |
1653 ! |
1653 ! |
1654 |
1654 |
1655 version_SVN |
1655 version_SVN |
1656 ^ '$Id: Tools__ChangeList.st,v 1.37 2015-02-26 01:06:39 cg Exp $' |
1656 ^ '$Id$' |
1657 ! ! |
1657 ! ! |
1658 |
1658 |