aboutsummaryrefslogtreecommitdiff
path: root/tea-cleaner/TeaCleaner/Types.hs
diff options
context:
space:
mode:
authorEugen Wissner <belka@caraus.de>2025-01-26 10:17:33 +0100
committerEugen Wissner <belka@caraus.de>2025-01-26 10:17:33 +0100
commit6c170513a69bd4c49b006d0672637a48eb449884 (patch)
tree617403177519fec8312502c40bf3e3bc98b9c48d /tea-cleaner/TeaCleaner/Types.hs
parent3c430bca64c813a0a04cb98d5cd9a3d3fb70e1b0 (diff)
downloadkazbek-6c170513a69bd4c49b006d0672637a48eb449884.tar.gz
tea-cleaner: Add command line parser
Diffstat (limited to 'tea-cleaner/TeaCleaner/Types.hs')
-rw-r--r--tea-cleaner/TeaCleaner/Types.hs53
1 files changed, 0 insertions, 53 deletions
diff --git a/tea-cleaner/TeaCleaner/Types.hs b/tea-cleaner/TeaCleaner/Types.hs
deleted file mode 100644
index 786dedb..0000000
--- a/tea-cleaner/TeaCleaner/Types.hs
+++ /dev/null
@@ -1,53 +0,0 @@
-module TeaCleaner.Types
- ( Activity(..)
- , User(..)
- ) where
-
-import TeaCleaner.Options (jsonOptions)
-import Data.Int (Int64)
-import Data.Text (Text)
-import qualified Data.Aeson.TH as Aeson
-import Data.Time (ZonedTime(..))
-
-data User = User
- { id :: Int64
- , login :: Text
- , loginName :: Text
- , fullName :: Text
- , email :: Text
- , avatarUrl :: Text
- , language :: Text
- , isAdmin :: Bool
- , lastLogin :: ZonedTime
- , created :: ZonedTime
- , restricted :: Bool
- , active :: Bool
- , prohibitLogin :: Bool
- , location :: Text
- , website :: Text
- , description :: Text
- , visibility :: Text
- , followersCount :: Int
- , followingCount :: Int
- , starredReposCount :: Int
- , username :: Text
- } deriving (Show)
-
-$(Aeson.deriveJSON jsonOptions ''User)
-
-data Activity = Activity
- { actUserId :: Int64
- -- , comment Comment
- , commentId :: Int64
- , content :: Text
- , created :: ZonedTime
- , id :: Int64
- , isPrivate :: Bool
- , opType :: Text
- , refName :: Text
- -- repo Repository{...}
- , repoId :: Int64
- , userId :: Int64
- } deriving (Show)
-
-$(Aeson.deriveJSON jsonOptions ''Activity)