diff -r 17f24207e66b -r 7c2893222b28 SVN__MoveCommand.st --- a/SVN__MoveCommand.st Mon Aug 08 15:39:28 2011 +0200 +++ b/SVN__MoveCommand.st Mon Aug 08 15:39:49 2011 +0200 @@ -1,3 +1,28 @@ +" + Copyright (c) 2007-2010 Jan Vrany + Copyright (c) 2009-2010 eXept Software AG + + Permission is hereby granted, free of charge, to any person + obtaining a copy of this software and associated documentation + files (the 'Software'), to deal in the Software without + restriction, including without limitation the rights to use, + copy, modify, merge, publish, distribute, sublicense, and/or sell + copies of the Software, and to permit persons to whom the + Software is furnished to do so, subject to the following + conditions: + + The above copyright notice and this permission notice shall be + included in all copies or substantial portions of the Software. + + THE SOFTWARE IS PROVIDED 'AS IS', WITHOUT WARRANTY OF ANY KIND, + EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES + OF MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND + NONINFRINGEMENT. IN NO EVENT SHALL THE AUTHORS OR COPYRIGHT + HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY, + WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING + FROM, OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR + OTHER DEALINGS IN THE SOFTWARE. +" "{ Package: 'stx:libsvn' }" "{ NameSpace: SVN }" @@ -9,6 +34,42 @@ category:'SVN-Private-Commands' ! +!MoveCommand class methodsFor:'documentation'! + +copyright +" + Copyright (c) 2007-2010 Jan Vrany + Copyright (c) 2009-2010 eXept Software AG + + Permission is hereby granted, free of charge, to any person + obtaining a copy of this software and associated documentation + files (the 'Software'), to deal in the Software without + restriction, including without limitation the rights to use, + copy, modify, merge, publish, distribute, sublicense, and/or sell + copies of the Software, and to permit persons to whom the + Software is furnished to do so, subject to the following + conditions: + + The above copyright notice and this permission notice shall be + included in all copies or substantial portions of the Software. + + THE SOFTWARE IS PROVIDED 'AS IS', WITHOUT WARRANTY OF ANY KIND, + EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES + OF MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND + NONINFRINGEMENT. IN NO EVENT SHALL THE AUTHORS OR COPYRIGHT + HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY, + WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING + FROM, OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR + OTHER DEALINGS IN THE SOFTWARE. + +" +! ! + +!MoveCommand class methodsFor:'others'! + +version_CVS + ^ '$ÂHeader: /cvs/stx/stx/libsvn/SVN__MoveCommand.st,v 1.5 2009/10/19 12:52:48 fm Exp Â$' +! ! !MoveCommand methodsFor:'accessing'! @@ -49,24 +110,31 @@ svnCmdArgumentsOn:arg "raise an error: must be redefined in concrete subclass(es)" + | srcArg dstArg wcPath | + wcPath := workingCopy path pathName. + srcArg := (src startsWith: wcPath) + ifTrue:[src copyFrom: wcPath size + 2] + ifFalse:[src]. + dstArg := (src startsWith: wcPath) + ifTrue:[dst copyFrom: wcPath size + 2] + ifFalse:[dst]. + + super svnCmdArgumentsOn:arg. arg - nextPut: src; - nextPut: dst + nextPut: srcArg; + nextPut: dstArg "Created: / 16-03-2008 / 10:22:26 / janfrog" + "Modified: / 28-07-2010 / 22:29:21 / Jan Vrany " ! ! !MoveCommand class methodsFor:'documentation'! version - ^ '$Header$' -! - -version_CVS - ^ '$Header$' + ^ '$Id$' ! version_SVN - ^'§Id: SVN__MoveCommand.st 70 2009-04-16 12:47:44Z vranyj1 §' + ^ '§Id: SVN__MoveCommand.st 350 2011-07-07 18:42:56Z vranyj1 §' ! !