repository/Fossil/FossilRepo.class.st

@@ -35,15 +35,11 @@ FossilRepo class >> executable: aPathString [
 
 { #category : #'instance creation' }
 FossilRepo class >> local: aFilePath repository: aFossilFilePath [
-	
-	| repo |
-	repo := self new 
+
+	^ self new 
 		local: aFilePath;
-		repository: aFossilFilePath.
-	repo remote = 'off'
-		ifTrue: [ repo remote: nil ]
-		ifFalse: [ repo remote: repo remote ].
-	^ repo
+		repository: aFossilFilePath;
+		yourself
 ]
 
 { #category : #accessing }
@@ -173,19 +169,6 @@ FossilRepo >> createPage: pageName [
 	^ NeoJSONReader fromString: (self jsonWikiDataFor: 'create/', pageName) 
 ]
 
-{ #category : #accessing }
-FossilRepo >> delete: fileRelativePath [
-	"I delete a file to the working Fossil repository, given that both, the file and the repositor,
-	share the same root directory/folder."
-	
-	OSSUnixSubprocess new 
-		command: self class locateExecutable;
-		workingDirectory: self localRoot;
-		arguments: { 'delete' . fileRelativePath };
-		redirectStdout;
-		runAndWaitOnExitDo: [ :process :outString | ^ outString ] 
-]
-
 { #category : #accessing }
 FossilRepo >> diff [
 
@@ -454,11 +437,7 @@ FossilRepo >> remote [
 
 { #category : #accessing }
 FossilRepo >> remote: anUrlString [
-
-	anUrlString 
-		ifNil: [ remote := anUrlString ]
-		ifNotNil: [ remote := anUrlString asUrl ]
-	
+	remote := anUrlString asUrl 
 ]
 
 { #category : #accessing }