diff options
| author | Eugen Wissner <belka@caraus.de> | 2024-11-25 17:08:28 +0100 |
|---|---|---|
| committer | Eugen Wissner <belka@caraus.de> | 2024-11-25 17:08:28 +0100 |
| commit | 468852410e3881910d803192f13ed13f19a7af41 (patch) | |
| tree | f44f6f06a0d1883ab64a07f440dcef6b773da29f /lib/SlackBuilder/Package.hs | |
| parent | b5e6e3a2d68111cc7f84d939dc7b82ff2aac1801 (diff) | |
| download | slackbuilder-468852410e3881910d803192f13ed13f19a7af41.tar.gz | |
List installed packages from a repository
Diffstat (limited to 'lib/SlackBuilder/Package.hs')
| -rw-r--r-- | lib/SlackBuilder/Package.hs | 15 |
1 files changed, 14 insertions, 1 deletions
diff --git a/lib/SlackBuilder/Package.hs b/lib/SlackBuilder/Package.hs index 5179c4c..c87bf4b 100644 --- a/lib/SlackBuilder/Package.hs +++ b/lib/SlackBuilder/Package.hs @@ -5,7 +5,8 @@ -- | Contains data describing packages, methods to update them and to request -- information about them. module SlackBuilder.Package - ( Download(..) + ( DataBaseEntry(..) + , Download(..) , DownloadTemplate(..) , PackageDescription(..) , PackageUpdateData(..) @@ -66,3 +67,15 @@ data Updater = Updater , is64 :: Bool , getVersion :: Text -> Text -> SlackBuilderT Download } + +data DataBaseEntry = DataBaseEntry + { name :: Text + , version :: Text + , arch :: Text + , build :: Text + } deriving Eq + +instance Show DataBaseEntry + where + show DataBaseEntry{..} = Text.unpack + $ Text.intercalate "-" [name, version, arch, build] |