Add dismiss_notification()

Author: dominicletz

.tool-versions

@@ -1,2 +1,2 @@
-erlang 24.3.3 24.3.4.14 system
+erlang 24.3.3 24.3.4.14 24.3.4.17 system
 elixir 1.16.3-otp-24

lib/desktop/fallback.ex

@@ -208,6 +208,10 @@ defmodule Desktop.Fallback do
     end
   end
 
+  def notification_close(notification) do
+    call(:wxNotificationMessage, :close, [notification])
+  end
+
   def wx_subscribe() do
     call(:wx, :subscribe_events)
   end

lib/desktop/window.ex

@@ -430,9 +430,7 @@ defmodule Desktop.Window do
 
   ## Examples
 
-      iex> :wx.set_env(Desktop.Env.wx_env())
-      iex> :wxWebView.isContextMenuEnabled(Desktop.Window.webview(pid))
-      false
+      iex> Desktop.Window.show_notification(pid, "Hello, world!")
 
   """
   def show_notification(pid, text, opts \\ []) do
@@ -459,6 +457,13 @@ defmodule Desktop.Window do
     GenServer.cast(pid, {:show_notification, text, id, type, title, callback, timeout})
   end
 
+  @doc """
+  Dismiss a notification
+  """
+  def dismiss_notification(pid, id) do
+    GenServer.cast(pid, {:dismiss_notification, id})
+  end
+
   @doc """
   Quit the application. This forces a quick termination which can
   be helpful on MacOS/Windows as sometimes the destruction is
@@ -600,6 +605,17 @@ defmodule Desktop.Window do
     {:noreply, %Window{ui | notifications: noties}}
   end
 
+  def handle_cast({:dismiss_notification, id}, ui = %Window{notifications: noties}) do
+    case Map.pop(noties, id) do
+      {nil, _noties} ->
+        {:noreply, ui}
+
+      {{note, _callback}, noties} ->
+        Fallback.notification_close(note)
+        {:noreply, %Window{ui | notifications: noties}}
+    end
+  end
+
   def handle_cast({:show, url}, ui = %Window{home_url: home, last_url: last}) do
     new_url = prepare_url(url || last || home)
     Logger.info("Showing #{new_url}")