diff --git a/repository/Fossil/FossilRepo.class.st b/repository/Fossil/FossilRepo.class.st
index 0dff006..5e09989 100644
--- a/repository/Fossil/FossilRepo.class.st
+++ b/repository/Fossil/FossilRepo.class.st
@@ -443,13 +443,19 @@ FossilRepo >> remote: anUrlString [
 { #category : #accessing }
 FossilRepo >> renameFrom: currentName to: newName [
 
+	^ self renameFrom: currentName to: newName inSubfolder: self localRoot
+]
+
+{ #category : #accessing }
+FossilRepo >> renameFrom: currentName to: newName inSubfolder: aFolder [
+
 	OSSUnixSubprocess new
 		command: 'fossil';
 		arguments: { 
 				'rename'.
-				currentName.
-				newName };
-		workingDirectory: self localRoot;
+				currentName basename.
+				newName basename};
+		workingDirectory: aFolder fullName;
 		redirectStdout;
 		redirectStderr;
 		runAndWaitOnExitDo: [ :process :outString | ^ outString ]