--- /dev/null	Thu Jan 01 00:00:00 1970 +0000
+++ b/SVN__MoveCommand.st	Wed Sep 23 18:49:38 2009 +0200
@@ -0,0 +1,69 @@
+"{ Package: 'cvut:stx/goodies/libsvn' }"
+
+"{ NameSpace: SVN }"
+
+WCCommand subclass:#MoveCommand
+	instanceVariableNames:'src dst'
+	classVariableNames:''
+	poolDictionaries:''
+	category:'SVN-Private-Commands'
+!
+
+!MoveCommand class methodsFor:'documentation'!
+
+version_SVN
+    ^'$Id$'
+! !
+
+!MoveCommand methodsFor:'accessing'!
+
+dst
+    ^ dst
+
+    "Created: / 16-03-2008 / 10:22:26 / janfrog"
+!
+
+dst:something
+    dst := something.
+
+    "Created: / 16-03-2008 / 10:22:26 / janfrog"
+!
+
+src
+    ^ src
+
+    "Created: / 16-03-2008 / 10:22:26 / janfrog"
+!
+
+src:something
+    src := something.
+
+    "Created: / 16-03-2008 / 10:22:26 / janfrog"
+! !
+
+!MoveCommand methodsFor:'executing - private'!
+
+svnCmd
+    "raise an error: must be redefined in concrete subclass(es)"
+
+    ^'move'
+
+    "Created: / 16-03-2008 / 10:22:26 / janfrog"
+!
+
+svnCmdArgumentsOn:arg 
+    "raise an error: must be redefined in concrete subclass(es)"
+
+    super svnCmdArgumentsOn:arg.
+    arg 
+        nextPut: src;
+        nextPut: dst
+
+    "Created: / 16-03-2008 / 10:22:26 / janfrog"
+! !
+
+!MoveCommand class methodsFor:'documentation'!
+
+version
+    ^ '$Header$'
+! !