File leptus-1.4.2-stacktrace.patch of Package leptus

Overview Repositories Revisions Requests Users Attributes Meta

File leptus-1.4.2-stacktrace.patch of Package leptus

diff -Ndurp leptus-1.4.2/src/leptus_handler.erl leptus-1.4.2-stacktrace/src/leptus_handler.erl
--- leptus-1.4.2/src/leptus_handler.erl	2019-07-08 15:49:02.000000000 +0300
+++ leptus-1.4.2-stacktrace/src/leptus_handler.erl	2022-08-07 21:38:14.553497663 +0300
@@ -20,12 +20,6 @@
 
 -module(leptus_handler).
 
--ifdef(OTP_RELEASE).
--if(?OTP_RELEASE >= 21).
--compile({nowarn_deprecated_function, {erlang, get_stacktrace, 0}}).
--endif.
--endif.
-
 %% -----------------------------------------------------------------------------
 %% cowboy callbacks
 %% -----------------------------------------------------------------------------
@@ -83,8 +77,7 @@ upgrade(Req, Env, _Handler,
                 reply(500, Req),
                 badmatch_error_info(Else, {Handler, init, 3}, Route, Req, State),
                 State#state{terminate_reason = {error, badmatch}}
-        catch Class:Reason ->
-            Stacktrace = erlang:get_stacktrace(),
+        catch Class:Reason:Stacktrace ->
             reply(500, Req),
             error_info(Class, {Reason, Stacktrace}, Route, Req, HState),
             State#state{terminate_reason = {error, Reason}}
@@ -134,8 +127,8 @@ handle_request(Func, Req, #state{resrc =
                     {true, HandlerState1} ->
                         try Handler:Func(Route, Req, HandlerState1) of
                             Response -> handle_response(Response, Req, State#state{terminate_reason = normal})
-                        catch Class:Reason ->
-                            error_info(Class, {Reason, erlang:get_stacktrace()}, Route, Req, HandlerState1),
+                        catch Class:Reason:Stacktrace ->
+                            error_info(Class, {Reason, Stacktrace}, Route, Req, HandlerState1),
                             handle_response({500, <<>>, HandlerState1}, Req,
                                             State#state{terminate_reason = {error, Reason}})
                         end;
@@ -177,8 +170,8 @@ authorization(Handler, Route, Req, Handl
                          Else ->
                              badmatch_error_info(Else, {Handler, is_authenticated, 3}, Route, Req, HandlerState),
                              {false, {500, <<>>, HandlerState}, badmatch}
-                     catch Class:Reason ->
-                         error_info(Class, {Reason, erlang:get_stacktrace()}, Route, Req, HandlerState),
+                     catch Class:Reason:Stacktrace ->
+                         error_info(Class, {Reason, Stacktrace}, Route, Req, HandlerState),
                          {false, {500, <<>>, HandlerState}, {error, Reason}}
                      end;
               false -> {true, HandlerState}
@@ -194,8 +187,8 @@ authorization(Handler, Route, Req, Handl
                             Else1 ->
                                 badmatch_error_info(Else1, {Handler, has_permission, 3}, Route, Req, HandlerState2),
                                 {false, {500, <<>>, HandlerState2}, badmatch}
-                        catch Class1:Reason1 ->
-                            error_info(Class1, {Reason1, erlang:get_stacktrace()}, Route, Req, HandlerState2),
+                        catch Class1:Reason1:Stacktrace1 ->
+                            error_info(Class1, {Reason1, Stacktrace1}, Route, Req, HandlerState2),
                             {false, {500, <<>>, HandlerState2}, {error, Reason1}}
                         end;
                 false -> Res
@@ -259,8 +252,8 @@ handler_cross_domains(Handler, Route, Re
                         Else ->
                             badmatch_error_info(Else, {Handler, cross_domains, 3}, Route, Req, HandlerState),
                             throw(badmatch)
-                    catch Class:Reason ->
-                        error_info(Class, {Reason, erlang:get_stacktrace()}, Route, Req, HandlerState),
+                    catch Class:Reason:Stacktrace ->
+                        error_info(Class, {Reason, Stacktrace}, Route, Req, HandlerState),
                         throw(Reason)
                     end
             end

Places

File leptus-1.4.2-stacktrace.patch of Package leptus

Places