replaced hamletToRepHtml with giveUrlRenderer updated type RepHtml to Html replaced settingsPort with setPort
		
			
				
	
	
		
			9 lines
		
	
	
		
			168 B
		
	
	
	
		
			Haskell
		
	
	
	
	
	
			
		
		
	
	
			9 lines
		
	
	
		
			168 B
		
	
	
	
		
			Haskell
		
	
	
	
	
	
| -- | Site root and misc. handlers.
 | |
| 
 | |
| module Handler.RootR where
 | |
| 
 | |
| import Import
 | |
| 
 | |
| getRootR :: Handler Html
 | |
| getRootR = redirect defaultroute where defaultroute = RegisterR
 |