|  | @@ -6,17 +6,39 @@ import Html.Events exposing (..)
 | 
	
		
			
				|  |  |  import Html.Attributes exposing (id, class, classList)
 | 
	
		
			
				|  |  |  
 | 
	
		
			
				|  |  |  
 | 
	
		
			
				|  |  | +type alias Model =
 | 
	
		
			
				|  |  | +    {
 | 
	
		
			
				|  |  | +    }
 | 
	
		
			
				|  |  | +
 | 
	
		
			
				|  |  | +initModel : Model
 | 
	
		
			
				|  |  | +initModel =
 | 
	
		
			
				|  |  | +    {
 | 
	
		
			
				|  |  | +    }
 | 
	
		
			
				|  |  | +
 | 
	
		
			
				|  |  | +
 | 
	
		
			
				|  |  | +type Msg
 | 
	
		
			
				|  |  | +    = NoOp
 | 
	
		
			
				|  |  | +
 | 
	
		
			
				|  |  | +
 | 
	
		
			
				|  |  | +view : Model -> Html Msg
 | 
	
		
			
				|  |  |  view model =
 | 
	
		
			
				|  |  |      div
 | 
	
		
			
				|  |  |          []
 | 
	
		
			
				|  |  |          [ text "$foldername" ]
 | 
	
		
			
				|  |  |  
 | 
	
		
			
				|  |  | +update : Msg -> Model -> (Model, Cmd Msg)
 | 
	
		
			
				|  |  |  update msg model =
 | 
	
		
			
				|  |  |      ( model, Cmd.none )
 | 
	
		
			
				|  |  |  
 | 
	
		
			
				|  |  | +--subscriptions : Model -> Sub Msg
 | 
	
		
			
				|  |  | +--subscriptions model =
 | 
	
		
			
				|  |  | +--    Sub.batch
 | 
	
		
			
				|  |  | +--        [
 | 
	
		
			
				|  |  | +--        ]
 | 
	
		
			
				|  |  | +
 | 
	
		
			
				|  |  |  main =
 | 
	
		
			
				|  |  |      Html.program
 | 
	
		
			
				|  |  | -        { init = ("", Cmd.none)
 | 
	
		
			
				|  |  | +        { init = (initModel, Cmd.none)
 | 
	
		
			
				|  |  |          , view = view
 | 
	
		
			
				|  |  |          , update = update
 | 
	
		
			
				|  |  |          , subscriptions = \_ -> Sub.none
 |