common/SCMAbstractFileoutLikeTask.st
changeset 89 874f18be0cbd
parent 81 eeb86ad71bc3
child 114 8b27cb46af9a
--- a/common/SCMAbstractFileoutLikeTask.st	Wed Nov 21 01:21:47 2012 +0000
+++ b/common/SCMAbstractFileoutLikeTask.st	Wed Nov 21 01:23:22 2012 +0000
@@ -134,6 +134,7 @@
         doRemoveOldContainers.
 
     "Created: / 10-05-2012 / 17:05:57 / Jan Vrany <jan.vrany@fit.cvut.cz>"
+    "Modified: / 21-11-2012 / 00:43:00 / Jan Vrany <jan.vrany@fit.cvut.cz>"
 !
 
 doFileOutAll
@@ -336,16 +337,16 @@
     wcroot := package workingCopyRoot.
     oldC := self package containerNameForClassNamed: old language: lang .
     newC := self package containerNameForClassNamed: new language: lang .
-    (oldE := wcroot containerFilenameFor: oldC) exists ifTrue:[
+    (oldE := wcroot / oldC) exists ifTrue:[
         packageClassesChanged := true.
         newE := wcroot / newC.
-        newE moveTo: oldE.
+        oldE moveTo: newE.
     ].
 
     "Created: / 11-04-2008 / 11:00:27 / Jan Vrany <vranyj1@fel.cvut.cz>"
     "Modified: / 19-08-2009 / 15:03:51 / Jan Vrany <vranyj1@fel.cvut.cz>"
     "Created: / 06-08-2011 / 21:33:47 / Jan Vrany <jan.vrany@fit.cvut.cz>"
-    "Modified: / 19-11-2012 / 23:03:51 / Jan Vrany <jan.vrany@fit.cvut.cz>"
+    "Modified: / 21-11-2012 / 00:43:33 / Jan Vrany <jan.vrany@fit.cvut.cz>"
 !
 
 doRenameContainers
@@ -409,7 +410,7 @@
 
     "Created: / 20-06-2009 / 16:01:16 / Jan Vrany <vranyj1@fel.cvut.cz>"
     "Modified: / 21-06-2009 / 15:18:17 / Jan Vrany <vranyj1@fel.cvut.cz>"
-    "Modified: / 15-11-2012 / 00:27:57 / Jan Vrany <jan.vrany@fit.cvut.cz>"
+    "Modified: / 21-11-2012 / 00:37:28 / Jan Vrany <jan.vrany@fit.cvut.cz>"
 !
 
 doUpdateProjectDefinition