File 6911-megaco-Add-callback-attributes.patch of Package erlang

From 3c8ab9f9a9f63b76c6b3307dc0176dac4704c7d9 Mon Sep 17 00:00:00 2001
From: Lukas Larsson <lukas@erlang.org>
Date: Mon, 9 Oct 2023 15:52:18 +0200
Subject: [PATCH] megaco: Add callback attributes

---
 lib/megaco/src/engine/megaco_transport.erl | 21 ++++++++++++++++-----
 1 file changed, 16 insertions(+), 5 deletions(-)

diff --git a/lib/megaco/src/engine/megaco_transport.erl b/lib/megaco/src/engine/megaco_transport.erl
index 7b5c35265c..20d50482de 100644
--- a/lib/megaco/src/engine/megaco_transport.erl
+++ b/lib/megaco/src/engine/megaco_transport.erl
@@ -25,9 +25,20 @@
 
 -module(megaco_transport).
 
--export([behaviour_info/1]).
+-callback send_message(Handle, Msg) -> ok | {cancel, Reason :: term()} | Error when
+      Handle :: term(),
+      Msg :: iodata(),
+      Error :: term().
 
-behaviour_info(callbacks) ->
-    [{send_message,2}];
-behaviour_info(_) ->
-    undefined.
+-callback send_message(Handle, Msg, Resend) -> ok | {cancel, Reason :: term()} | Error  when
+      Handle :: term(),
+      Msg :: iodata(),
+      Resend :: boolean(),
+      Error :: term().
+
+-callback resend_message(Handle, Msg) -> ok | {cancel, Reason :: term()} | Error when
+      Handle :: term(),
+      Msg :: iodata(),
+      Error :: term().
+
+-optional_callbacks([{send_message,3},{resend_message,2}]).
-- 
2.35.3

openSUSE Build Service is sponsored by