File: logidispatch-2.68.patch

package info (click to toggle)
liblog-dispatch-message-passing-perl 0.009-5
  • links: PTS, VCS
  • area: main
  • in suites: bookworm
  • size: 276 kB
  • sloc: perl: 1,406; makefile: 9; sh: 4
file content (17 lines) | stat: -rw-r--r-- 551 bytes parent folder | download | duplicates (3)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
Description: adapt to changes in Log::Dispatch 2.68
 The internals have changed and the name of the output is lo longer passed to
 its logging methods, leading to failure in t/basic.t.
Author: Damyan Ivanov <dmn@debian.org>
Bug: https://rt.cpan.org/Ticket/Display.html?id=127156
Bug-Debian: https://bugs.debian.org/908766

--- a/lib/Log/Dispatch/Message/Passing.pm
+++ b/lib/Log/Dispatch/Message/Passing.pm
@@ -27,6 +27,7 @@ sub new {
 
 sub log_message {
   my ($self, %p) = @_;
+  $p{name} //= $self->{name};
   $self->{output}->consume({%p});
 }