From f8e2ad9feb08bc20645cc0a15714a769e45bd8e5 Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?Jonatan=20M=C3=A4nnchen?= <jonatan@maennchen.ch>
Date: Thu, 7 Dec 2023 21:54:37 +0100
Subject: [PATCH] Fix Formatting of record_match

Fixes #445
---
 lib/dialyxir/warnings.ex              |  1 +
 lib/dialyxir/warnings/record_match.ex | 17 +++++++++++++++++
 2 files changed, 18 insertions(+)
 create mode 100644 lib/dialyxir/warnings/record_match.ex

diff --git a/lib/dialyxir/warnings.ex b/lib/dialyxir/warnings.ex
index 9e1b221..f245d26 100644
--- a/lib/dialyxir/warnings.ex
+++ b/lib/dialyxir/warnings.ex
@@ -41,6 +41,7 @@ defmodule Dialyxir.Warnings do
                 Dialyxir.Warnings.PatternMatch,
                 Dialyxir.Warnings.PatternMatchCovered,
                 Dialyxir.Warnings.RecordConstruction,
+                Dialyxir.Warnings.RecordMatch,
                 Dialyxir.Warnings.RecordMatching,
                 Dialyxir.Warnings.UnknownBehaviour,
                 Dialyxir.Warnings.UnknownFunction,
diff --git a/lib/dialyxir/warnings/record_match.ex b/lib/dialyxir/warnings/record_match.ex
new file mode 100644
index 0000000..ae500da
--- /dev/null
+++ b/lib/dialyxir/warnings/record_match.ex
@@ -0,0 +1,17 @@
+defmodule Dialyxir.Warnings.RecordMatch do
+  @behaviour Dialyxir.Warning
+
+  @impl Dialyxir.Warning
+  @spec warning() :: :record_match
+  def warning(), do: :record_match
+
+  @impl Dialyxir.Warning
+  @spec format_short([String.t()]) :: String.t()
+  defdelegate format_short(args), to: Dialyxir.Warnings.RecordMatching
+
+  @impl Dialyxir.Warning
+  defdelegate format_long(args), to: Dialyxir.Warnings.RecordMatching
+
+  @impl Dialyxir.Warning
+  defdelegate explain(), to: Dialyxir.Warnings.RecordMatching
+end