diff -r fa90510322d5 -r 165726891c60 Tools__SourceCodeManagerConfigurationTestTool.st --- a/Tools__SourceCodeManagerConfigurationTestTool.st Wed Oct 12 17:41:32 2011 +0200 +++ b/Tools__SourceCodeManagerConfigurationTestTool.st Wed Oct 12 23:10:19 2011 +0200 @@ -111,17 +111,19 @@ doTest + |pkg mgr line| - | pkg mgr line | - packageView isNil ifTrue:[^self]. + packageView isNil ifTrue:[ + ^ self + ]. pkg := packageView contents. - pkg ifNil:[^self]. - mgr := AbstractSourceCodeManager managerForPackage: pkg. + pkg ifNil:[^ self]. + mgr := AbstractSourceCodeManager managerForPackage:pkg. line := '%1 -> %2, %3' - bindWith: pkg - with: mgr managerTypeNameShort - with: (mgr repositoryStringForPackage: pkg). - resultView showCR: line + bindWith:pkg + with:mgr managerTypeNameShort + with:(mgr repositoryNameForPackage:pkg). + resultView showCR:line "Modified: / 11-10-2011 / 08:58:02 / Jan Vrany " ! ! @@ -154,9 +156,9 @@ !SourceCodeManagerConfigurationTestTool class methodsFor:'documentation'! version - ^ '$Header: /cvs/stx/stx/libtool/Tools__SourceCodeManagerConfigurationTestTool.st,v 1.1 2011-10-11 11:14:18 vrany Exp $' + ^ '$Header: /cvs/stx/stx/libtool/Tools__SourceCodeManagerConfigurationTestTool.st,v 1.2 2011-10-12 21:10:19 vrany Exp $' ! version_CVS - ^ '$Header: /cvs/stx/stx/libtool/Tools__SourceCodeManagerConfigurationTestTool.st,v 1.1 2011-10-11 11:14:18 vrany Exp $' + ^ '$Header: /cvs/stx/stx/libtool/Tools__SourceCodeManagerConfigurationTestTool.st,v 1.2 2011-10-12 21:10:19 vrany Exp $' ! !