diff --git a/repository/Brea/BreaFile.class.st b/repository/Brea/BreaFile.class.st
index b2c8616..8e0f799 100644
--- a/repository/Brea/BreaFile.class.st
+++ b/repository/Brea/BreaFile.class.st
@@ -43,6 +43,13 @@ BreaFile >> contents [
 	(self name endsWith: '.json') ifTrue: [ ^ NeoJSONObject fromString: file contents ]
 ]
 
+{ #category : #accessing }
+BreaFile >> file [ 
+	self folder ifNil: [ ^ self ].
+	self name ifNil: [ ^ self ].
+	^ self folder / self name.
+]
+
 { #category : #accessing }
 BreaFile >> folder [
 	^ folder
diff --git a/repository/Brea/BreaPage.class.st b/repository/Brea/BreaPage.class.st
index 94a47ab..7b2b08a 100644
--- a/repository/Brea/BreaPage.class.st
+++ b/repository/Brea/BreaPage.class.st
@@ -26,6 +26,9 @@ Class {
 BreaPage >> bodyContentsAsHTML [
 	| sourcePage  |
 	self contentsFile ifNil: [ ^ self ].
+	Smalltalk os isWindows ifTrue: [ 
+		^ Pandoc markdownToHtml: self file file
+	]. 
 	sourcePage := FileLocator temp / 'wikiPage.md'.
 	MarkupFile exportAsFileOn: sourcePage containing: self contents.
 	^ Pandoc markdownToHtml: sourcePage 
diff --git a/repository/Brea/BreaTheme.class.st b/repository/Brea/BreaTheme.class.st
index 0b840fd..23d6e68 100644
--- a/repository/Brea/BreaTheme.class.st
+++ b/repository/Brea/BreaTheme.class.st
@@ -143,7 +143,7 @@ BreaTheme >> folder: anObject [
 BreaTheme >> installInto: aFolder [
 	| zippedFile  |
 	self url ifNil: [ ^ self ].
-	zippedFile := self downloadInto: aFolder.
+	zippedFile := self downloadInto: FileLocator temp.
 	(ZipArchive new readFrom: zippedFile) extractAllTo: aFolder.
 	^ aFolder
 ]