🐛 Fix iconize in template

Author: oschrenk

Sources/Model/EventTransformer.swift

@@ -16,7 +16,11 @@ class EventTransformer {
     for rule in rules where event.title.label.range(
       of: rule.regex, options: .regularExpression
     ) != nil {
-      return event |> (Event.titleLens * Title.iconLens) *~ rule.icon
+      let withIcon = event
+        |> (Event.titleLens * Title.iconLens) *~ rule.icon
+      let withFull = withIcon
+        |> (Event.titleLens * Title.fullLens) *~ "\(rule.icon) \(event.title.full)"
+      return withFull
     }
     return event
   }

Sources/Model/Title.swift

@@ -89,4 +89,13 @@ extension Title {
       icon: icon
     ) }
   )
+
+  static let fullLens = Lens<Title, String>(
+    get: { title in title.full },
+    set: { full, title in Title(
+      full: full,
+      label: title.label,
+      icon: title.icon
+    ) }
+  )
 }