{-# LANGUAGE OverloadedStrings, DeriveDataTypeable #-}
module ViewModels.ShortUserViewModel where
import Data.Text
import Data.Data

data ShortUserViewModel = ShortUserViewModel {
  displayName :: Maybe Text,
  loginURL :: Text,
  logoutURL :: Text
  } deriving (Data, Typeable)
