diff -r f0126e42bbef -r 8b400fde34ef VersionDiffBrowser.st --- a/VersionDiffBrowser.st Tue Sep 17 11:25:54 2013 +0100 +++ b/VersionDiffBrowser.st Thu Sep 19 10:20:29 2013 +0100 @@ -1708,42 +1708,42 @@ singleView := self componentAt:#singleTextView. (Array - with:leftView - with:rightView - with:singleView) + with:leftView + with:rightView + with:singleView) do:[:v | - |mGen| - - mGen := [ - |m| - - m := v editMenu. - - (m selectorAt:#accept) isNil ifTrue:[ - m addLabels:(resources array:#('-' 'Accept')) - selectors:(Array with:nil with:#accept) - after:#copySelection. - ]. - m - actionAt:#accept - put:[ - v == singleView ifTrue:[ - self acceptInSingleView - ] ifFalse:[ - v == leftView ifTrue:[ - self acceptInLeftView - ] ifFalse:[ - self acceptInRightView - ]. - ]. - ]. - m selectorAt:#accept put:nil. - m enable:#copySelection. - m setEnable:#accept to:[self canAcceptInCodeView]. - m - ]. - v menuHolder:mGen. - v menuMessage:#value. + |mGen| + + mGen := [ + |m| + + m := v editMenu. + + (m selectorAt:#accept) isNil ifTrue:[ + m addLabels:(resources array:#('-' 'Accept')) + selectors:#(nil #accept) + after:#copySelection. + ]. + m + actionAt:#accept + put:[ + v == singleView ifTrue:[ + self acceptInSingleView + ] ifFalse:[ + v == leftView ifTrue:[ + self acceptInLeftView + ] ifFalse:[ + self acceptInRightView + ]. + ]. + ]. + m selectorAt:#accept put:nil. + m enable:#copySelection. + m setEnable:#accept to:[self canAcceptInCodeView]. + m + ]. + v menuHolder:mGen. + v menuMessage:#value. ] ! @@ -2481,11 +2481,11 @@ !VersionDiffBrowser class methodsFor:'documentation'! version - ^ '$Header: /cvs/stx/stx/libtool/VersionDiffBrowser.st,v 1.116 2013-08-07 09:57:46 stefan Exp $' + ^ '$Header: /cvs/stx/stx/libtool/VersionDiffBrowser.st,v 1.117 2013-09-12 08:29:48 cg Exp $' ! version_CVS - ^ '$Header: /cvs/stx/stx/libtool/VersionDiffBrowser.st,v 1.116 2013-08-07 09:57:46 stefan Exp $' + ^ '$Header: /cvs/stx/stx/libtool/VersionDiffBrowser.st,v 1.117 2013-09-12 08:29:48 cg Exp $' ! version_HG