Make ItemMerge independent from the action

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

@@ -24,16 +24,9 @@ type alias Texts =
     { basics : Messages.Basics.Texts
     , httpError : Http.Error -> String
     , title : String
-    , infoText : String
-    , deleteWarn : String
     , formatDateLong : Int -> String
     , formatDateShort : Int -> String
-    , submitMerge : String
-    , cancelMerge : String
-    , submitMergeTitle : String
-    , cancelMergeTitle : String
-    , mergeSuccessful : String
-    , mergeInProcess : String
+    , cancelView : String
     }
 
 
@@ -42,16 +35,9 @@ gb tz =
     { basics = Messages.Basics.gb
     , httpError = Messages.Comp.HttpError.gb
     , title = "Merge Items"
-    , infoText = "When merging items the first item in the list acts as the target. Every other items metadata is copied into the target item. If the property is a single value (like correspondent), it is only set if not already present. Tags, custom fields and attachments are added. The items can be reordered using drag&drop."
-    , deleteWarn = "Note that all items but the first one is deleted after a successful merge!"
     , formatDateLong = Messages.DateFormat.formatDateLong Messages.UiLanguage.English tz
     , formatDateShort = Messages.DateFormat.formatDateShort Messages.UiLanguage.English tz
-    , submitMerge = "Merge"
-    , submitMergeTitle = "Merge the documents now"
-    , cancelMerge = "Cancel"
-    , cancelMergeTitle = "Back to select view"
-    , mergeSuccessful = "Items merged successfully"
-    , mergeInProcess = "Items are merged …"
+    , cancelView = "Cancel"
     }
 
 
@@ -60,16 +46,9 @@ de tz =
     { basics = Messages.Basics.de
     , httpError = Messages.Comp.HttpError.de
     , title = "Dokumente zusammenführen"
-    , infoText = "Beim Zusammenführen der Dokumente, wird das erste in der Liste als Zieldokument verwendet. Die Metadaten der anderen Dokumente werden der Reihe nach auf des Zieldokument geschrieben. Metadaten die nur einen Wert haben, werden nur gesetzt falls noch kein Wert existiert. Tags, Benutzerfelder und Anhänge werden zu dem Zieldokument hinzugefügt. Die Einträge können mit Drag&Drop umgeordnet werden."
-    , deleteWarn = "Bitte beachte, dass nach erfolgreicher Zusammenführung alle anderen Dokumente gelöscht werden!"
     , formatDateLong = Messages.DateFormat.formatDateLong Messages.UiLanguage.German tz
     , formatDateShort = Messages.DateFormat.formatDateShort Messages.UiLanguage.German tz
-    , submitMerge = "Zusammenführen"
-    , submitMergeTitle = "Dokumente jetzt zusammenführen"
-    , cancelMerge = "Abbrechen"
-    , cancelMergeTitle = "Zurück zur Auswahl"
-    , mergeSuccessful = "Die Dokumente wurden erfolgreich zusammengeführt."
-    , mergeInProcess = "Dokumente werden zusammengeführt…"
+    , cancelView = "Abbrechen"
     }
 
 
@@ -78,14 +57,7 @@ fr tz =
     { basics = Messages.Basics.fr
     , httpError = Messages.Comp.HttpError.fr
     , title = "Fusionner des documents"
-    , infoText = "Lors d'une fusion, le premier document sert de cible. Les métadonnées des autres documents sont ajoutées à la cible. Si la propriété est un valeur seule (comme correspondant), ceci est ajouté si pas déjà présent. Tags, champs personnalisés et pièces-jointes sont ajoutés. Les documents peuvent être réordonnés avec le glisser/déposer."
-    , deleteWarn = "Veuillez noter que tous les documents sont supprimés après une fusion réussie !"
     , formatDateLong = Messages.DateFormat.formatDateLong Messages.UiLanguage.French tz
     , formatDateShort = Messages.DateFormat.formatDateShort Messages.UiLanguage.French tz
-    , submitMerge = "Fusionner"
-    , submitMergeTitle = "Lancer la fusion"
-    , cancelMerge = "Annuler"
-    , cancelMergeTitle = "Annuler la fusion"
-    , mergeSuccessful = "Documents fusionnés avec succès"
-    , mergeInProcess = "Fusion en cours ..."
+    , cancelView = "Annuler"
     }

modules/webapp/src/main/elm/Messages/Page/Search.elm

@@ -60,6 +60,13 @@ type alias Texts =
     , expandCollapseRows : String
     , bookmarkQuery : String
     , nothingToBookmark : String
+    , submitMerge : String
+    , mergeInfoText : String
+    , mergeDeleteWarn : String
+    , submitMergeTitle : String
+    , cancelMergeTitle : String
+    , mergeSuccessful : String
+    , mergeInProcess : String
     }
 
 
@@ -102,6 +109,13 @@ gb tz =
     , expandCollapseRows = "Expand/Collapse all"
     , bookmarkQuery = "Bookmark query"
     , nothingToBookmark = "Nothing selected to bookmark"
+    , submitMerge = "Merge"
+    , mergeInfoText = "When merging items the first item in the list acts as the target. Every other items metadata is copied into the target item. If the property is a single value (like correspondent), it is only set if not already present. Tags, custom fields and attachments are added. The items can be reordered using drag&drop."
+    , mergeDeleteWarn = "Note that all items but the first one is deleted after a successful merge!"
+    , submitMergeTitle = "Merge the documents now"
+    , cancelMergeTitle = "Back to select view"
+    , mergeSuccessful = "Items merged successfully"
+    , mergeInProcess = "Items are merged …"
     }
 
 
@@ -144,6 +158,13 @@ de tz =
     , expandCollapseRows = "Alle ein-/ausklappen"
     , bookmarkQuery = "Abfrage merken"
     , nothingToBookmark = "Keine Abfrage vorhanden"
+    , submitMerge = "Zusammenführen"
+    , mergeInfoText = "Beim Zusammenführen der Dokumente, wird das erste in der Liste als Zieldokument verwendet. Die Metadaten der anderen Dokumente werden der Reihe nach auf des Zieldokument geschrieben. Metadaten die nur einen Wert haben, werden nur gesetzt falls noch kein Wert existiert. Tags, Benutzerfelder und Anhänge werden zu dem Zieldokument hinzugefügt. Die Einträge können mit Drag&Drop umgeordnet werden."
+    , mergeDeleteWarn = "Bitte beachte, dass nach erfolgreicher Zusammenführung alle anderen Dokumente gelöscht werden!"
+    , submitMergeTitle = "Dokumente jetzt zusammenführen"
+    , cancelMergeTitle = "Zurück zur Auswahl"
+    , mergeSuccessful = "Die Dokumente wurden erfolgreich zusammengeführt."
+    , mergeInProcess = "Dokumente werden zusammengeführt…"
     }
 
 
@@ -186,4 +207,11 @@ fr tz =
     , expandCollapseRows = "Étendre/Réduire tout"
     , bookmarkQuery = "Requête de favoris"
     , nothingToBookmark = "Rien n'est sélectionné en favori"
+    , submitMerge = "Fusionner"
+    , mergeInfoText = "Lors d'une fusion, le premier document sert de cible. Les métadonnées des autres documents sont ajoutées à la cible. Si la propriété est un valeur seule (comme correspondant), ceci est ajouté si pas déjà présent. Tags, champs personnalisés et pièces-jointes sont ajoutés. Les documents peuvent être réordonnés avec le glisser/déposer."
+    , mergeDeleteWarn = "Veuillez noter que tous les documents sont supprimés après une fusion réussie !"
+    , submitMergeTitle = "Lancer la fusion"
+    , cancelMergeTitle = "Annuler la fusion"
+    , mergeSuccessful = "Documents fusionnés avec succès"
+    , mergeInProcess = "Fusion en cours ..."
     }