Basic management of shares

modules/webapp/src/main/elm/Messages/Comp/ShareForm.elm

@@ -0,0 +1,46 @@
+{-
+   Copyright 2020 Eike K. & Contributors
+
+   SPDX-License-Identifier: AGPL-3.0-or-later
+-}
+
+
+module Messages.Comp.ShareForm exposing
+    ( Texts
+    , de
+    , gb
+    )
+
+import Messages.Basics
+
+
+type alias Texts =
+    { basics : Messages.Basics.Texts
+    , queryLabel : String
+    , enabled : String
+    , password : String
+    , publishUntil : String
+    , clearPassword : String
+    }
+
+
+gb : Texts
+gb =
+    { basics = Messages.Basics.gb
+    , queryLabel = "Query"
+    , enabled = "Enabled"
+    , password = "Password"
+    , publishUntil = "Publish Until"
+    , clearPassword = "Remove password"
+    }
+
+
+de : Texts
+de =
+    { basics = Messages.Basics.de
+    , queryLabel = "Abfrage"
+    , enabled = "Aktiv"
+    , password = "Passwort"
+    , publishUntil = "Publiziert bis"
+    , clearPassword = "Passwort entfernen"
+    }

modules/webapp/src/main/elm/Messages/Comp/ShareManage.elm

@@ -0,0 +1,74 @@
+{-
+   Copyright 2020 Eike K. & Contributors
+
+   SPDX-License-Identifier: AGPL-3.0-or-later
+-}
+
+
+module Messages.Comp.ShareManage exposing
+    ( Texts
+    , de
+    , gb
+    )
+
+import Http
+import Messages.Basics
+import Messages.Comp.HttpError
+import Messages.Comp.ShareForm
+import Messages.Comp.ShareTable
+
+
+type alias Texts =
+    { basics : Messages.Basics.Texts
+    , shareTable : Messages.Comp.ShareTable.Texts
+    , shareForm : Messages.Comp.ShareForm.Texts
+    , httpError : Http.Error -> String
+    , newShare : String
+    , copyToClipboard : String
+    , openInNewTab : String
+    , publicUrl : String
+    , reallyDeleteShare : String
+    , createNewShare : String
+    , deleteThisShare : String
+    , errorGeneratingQR : String
+    , correctFormErrors : String
+    , noName : String
+    }
+
+
+gb : Texts
+gb =
+    { basics = Messages.Basics.gb
+    , httpError = Messages.Comp.HttpError.gb
+    , shareTable = Messages.Comp.ShareTable.gb
+    , shareForm = Messages.Comp.ShareForm.gb
+    , newShare = "New share"
+    , copyToClipboard = "Copy to clipboard"
+    , openInNewTab = "Open in new tab/window"
+    , publicUrl = "Public URL"
+    , reallyDeleteShare = "Really delete this share?"
+    , createNewShare = "Create new share"
+    , deleteThisShare = "Delete this share"
+    , errorGeneratingQR = "Error generating QR Code"
+    , correctFormErrors = "Please correct the errors in the form."
+    , noName = "No Name"
+    }
+
+
+de : Texts
+de =
+    { basics = Messages.Basics.de
+    , shareTable = Messages.Comp.ShareTable.de
+    , shareForm = Messages.Comp.ShareForm.de
+    , httpError = Messages.Comp.HttpError.de
+    , newShare = "Neue Freigabe"
+    , copyToClipboard = "In die Zwischenablage kopieren"
+    , openInNewTab = "Im neuen Tab/Fenster öffnen"
+    , publicUrl = "Öffentliche URL"
+    , reallyDeleteShare = "Diese Freigabe wirklich entfernen?"
+    , createNewShare = "Neue Freigabe erstellen"
+    , deleteThisShare = "Freigabe löschen"
+    , errorGeneratingQR = "Fehler beim Generieren des QR-Code"
+    , correctFormErrors = "Bitte korrigiere die Fehler im Formular."
+    , noName = "Ohne Name"
+    }

modules/webapp/src/main/elm/Messages/Comp/ShareTable.elm

@@ -0,0 +1,42 @@
+{-
+   Copyright 2020 Eike K. & Contributors
+
+   SPDX-License-Identifier: AGPL-3.0-or-later
+-}
+
+
+module Messages.Comp.ShareTable exposing
+    ( Texts
+    , de
+    , gb
+    )
+
+import Messages.Basics
+import Messages.DateFormat as DF
+import Messages.UiLanguage
+
+
+type alias Texts =
+    { basics : Messages.Basics.Texts
+    , formatDateTime : Int -> String
+    , enabled : String
+    , publishUntil : String
+    }
+
+
+gb : Texts
+gb =
+    { basics = Messages.Basics.gb
+    , formatDateTime = DF.formatDateTimeLong Messages.UiLanguage.English
+    , enabled = "Enabled"
+    , publishUntil = "Publish Until"
+    }
+
+
+de : Texts
+de =
+    { basics = Messages.Basics.de
+    , formatDateTime = DF.formatDateTimeLong Messages.UiLanguage.German
+    , enabled = "Aktiv"
+    , publishUntil = "Publiziert bis"
+    }