equal
deleted
inserted
replaced
1843 |
1843 |
1844 originalSource := textView model value ? ''. |
1844 originalSource := textView model value ? ''. |
1845 |
1845 |
1846 originalSource := originalSource asStringCollection. |
1846 originalSource := originalSource asStringCollection. |
1847 originalSource := originalSource collect:[:line | line string withoutTrailingSeparators withTabsExpanded]. |
1847 originalSource := originalSource collect:[:line | line string withoutTrailingSeparators withTabsExpanded]. |
1848 originalSource := originalSource collect:[:line | line isEmpty ifTrue:[nil] ifFalse:[line]]. |
1848 originalSource := originalSource collect:[:line | line asNilIfEmpty]. |
1849 [originalSource size > 0 and:[originalSource last isNil]] whileTrue:[ |
1849 [originalSource size > 0 and:[originalSource last isNil]] whileTrue:[ |
1850 originalSource := originalSource copyButLast:1 |
1850 originalSource := originalSource copyButLast:1 |
1851 ]. |
1851 ]. |
1852 |
1852 |
1853 s1 := originalSource asString. |
1853 s1 := originalSource asString. |
3605 ! ! |
3605 ! ! |
3606 |
3606 |
3607 !CodeView2 class methodsFor:'documentation'! |
3607 !CodeView2 class methodsFor:'documentation'! |
3608 |
3608 |
3609 version |
3609 version |
3610 ^ '$Header: /cvs/stx/stx/libtool/Tools__CodeView2.st,v 1.106 2013-07-10 12:37:48 cg Exp $' |
3610 ^ '$Header: /cvs/stx/stx/libtool/Tools__CodeView2.st,v 1.107 2013-07-13 21:06:11 cg Exp $' |
3611 ! |
3611 ! |
3612 |
3612 |
3613 version_CVS |
3613 version_CVS |
3614 ^ '$Header: /cvs/stx/stx/libtool/Tools__CodeView2.st,v 1.106 2013-07-10 12:37:48 cg Exp $' |
3614 ^ '$Header: /cvs/stx/stx/libtool/Tools__CodeView2.st,v 1.107 2013-07-13 21:06:11 cg Exp $' |
3615 ! |
3615 ! |
3616 |
3616 |
3617 version_SVN |
3617 version_SVN |
3618 ^ '$Id: Tools__CodeView2.st,v 1.106 2013-07-10 12:37:48 cg Exp $' |
3618 ^ '$Id: Tools__CodeView2.st,v 1.107 2013-07-13 21:06:11 cg Exp $' |
3619 ! ! |
3619 ! ! |
3620 |
3620 |
3621 |
3621 |
3622 CodeView2 initialize! |
3622 CodeView2 initialize! |