DiffListUtility.st
changeset 12717 dcde1443a6bb
parent 12384 60b956e6eb5f
child 12807 ba8c5416aa28
child 13340 7a295f0992df
equal deleted inserted replaced
12716:062e27d32904 12717:dcde1443a6bb
    80 
    80 
    81             line notEmptyOrNil ifTrue:[
    81             line notEmptyOrNil ifTrue:[
    82                 lOut := line.
    82                 lOut := line.
    83                 (line includes:Character return) ifTrue: [
    83                 (line includes:Character return) ifTrue: [
    84                     (line endsWith:Character return) ifTrue:[
    84                     (line endsWith:Character return) ifTrue:[
    85                         lOut := line copyWithoutLast:1.
    85                         lOut := line copyButLast:1.
    86                     ].
    86                     ].
    87                 ] ifFalse:[
    87                 ] ifFalse:[
    88                     (line endsWith:(String crlf)) ifTrue: [
    88                     (line endsWith:(String crlf)) ifTrue: [
    89                         lOut := line copyWithoutLast:2.
    89                         lOut := line copyButLast:2.
    90                     ]
    90                     ]
    91 "/                        i := line indexOf:Character return.
    91 "/                        i := line indexOf:Character return.
    92 "/                        (line at:i+1) == Character nl ifTrue:[
    92 "/                        (line at:i+1) == Character nl ifTrue:[
    93 "/                            "/ crnl endings
    93 "/                            "/ crnl endings
    94 "/                            lOut := line copyReplaceString:(String crlf) withString:(String lf).
    94 "/                            lOut := line copyReplaceString:(String crlf) withString:(String lf).
   205 ! !
   205 ! !
   206 
   206 
   207 !DiffListUtility class methodsFor:'documentation'!
   207 !DiffListUtility class methodsFor:'documentation'!
   208 
   208 
   209 version
   209 version
   210     ^ '$Header: /cvs/stx/stx/libtool/DiffListUtility.st,v 1.6 2013-02-01 15:13:18 cg Exp $'
   210     ^ '$Header: /cvs/stx/stx/libtool/DiffListUtility.st,v 1.7 2013-04-25 13:12:08 stefan Exp $'
   211 !
   211 !
   212 
   212 
   213 version_CVS
   213 version_CVS
   214     ^ '$Header: /cvs/stx/stx/libtool/DiffListUtility.st,v 1.6 2013-02-01 15:13:18 cg Exp $'
   214     ^ '$Header: /cvs/stx/stx/libtool/DiffListUtility.st,v 1.7 2013-04-25 13:12:08 stefan Exp $'
   215 ! !
   215 ! !
   216 
   216