Fix preview

Signed-off-by: Thomas Citharel <tcit@tcit.fr>

js/public/index.html

@@ -6,7 +6,6 @@
   <meta http-equiv="X-UA-Compatible" content="IE=edge">
   <meta name="viewport" content="width=device-width,initial-scale=1.0">
   <link rel="icon" href="<%= BASE_URL %>favicon.ico">
-  <title>mobilizon</title>
   <!--server-generated-meta-->
 </head>
 

js/src/views/Event/Event.vue

@@ -474,7 +474,13 @@ export default class Event extends EventMixin {
   }
 
   get emailShareUrl(): string {
-    return `mailto:?to=&body=${this.event.url}${encodeURIComponent('\n\n')}${this.event.description}&subject=${this.event.title}`;
+    return `mailto:?to=&body=${this.event.url}${encodeURIComponent('\n\n')}${this.textDescription}&subject=${this.event.title}`;
+  }
+
+  get textDescription(): string {
+    const meta = document.querySelector("meta[property='og:description']");
+    if (!meta) return '';
+    return meta.getAttribute('content') || '';
   }
 
 }

lib/service/metadata/event.ex

@@ -6,7 +6,11 @@ defimpl Mobilizon.Service.Metadata, for: Mobilizon.Events.Event do
   alias MobilizonWeb.MediaProxy
 
   def build_tags(%Event{} = event) do
+    event = Map.put(event, :description, process_description(event.description))
+
     tags = [
+      Tag.content_tag(:title, event.title <> " - Mobilizon"),
+      Tag.tag(:meta, name: "description", content: event.description),
       Tag.tag(:meta, property: "og:title", content: event.title),
       Tag.tag(:meta, property: "og:url", content: event.url),
       Tag.tag(:meta, property: "og:description", content: event.description),
@@ -33,6 +37,13 @@ defimpl Mobilizon.Service.Metadata, for: Mobilizon.Events.Event do
       ]
   end
 
+  defp process_description(description) do
+    description
+    |> HtmlSanitizeEx.strip_tags()
+    |> String.slice(0..200)
+    |> (&"#{&1}…").()
+  end
+
   # Insert JSON-LD schema by hand because Tag.content_tag wants to escape it
   defp json(%Event{} = event) do
     "event.json"