Also copy stylesheet
This commit is contained in:
		@@ -65,3 +65,5 @@ generateSite = do
 | 
				
			|||||||
  aboutDir <- joinPaths outputDir $ inject "om"
 | 
					  aboutDir <- joinPaths outputDir $ inject "om"
 | 
				
			||||||
  makeDir aboutDir
 | 
					  makeDir aboutDir
 | 
				
			||||||
  saveFile html $ joinPaths aboutDir indexName
 | 
					  saveFile html $ joinPaths aboutDir indexName
 | 
				
			||||||
 | 
					  styleName <- inject "style.css"
 | 
				
			||||||
 | 
					  copyFile styleName (joinPaths outputDir styleName)
 | 
				
			||||||
 
 | 
				
			|||||||
		Reference in New Issue
	
	Block a user