commandLineProcess (GetList cfg) = do 
  putStrLn "getlist called"
  mc <- getModelClientConfiguration =<< load [Required cfg] 
  maybe (error "cannot parse config") startGetList mc
commandLineProcess (GetList cfg) = do 
  putStrLn "getlist called"
  mc <- getModelClientConfiguration =<< load [Required cfg] 
  maybe (error "cannot parse config") startGetList mc
commandLineProcess (GetList cfg) = do 
  putStrLn "getlist called"
  mc <- getModelClientConfiguration =<< load [Required cfg] 
  maybe (error "cannot parse config") startGetList mc