File: TestLog.pm

package info (click to toggle)
libcatalyst-plugin-static-simple-perl 0.36-1
  • links: PTS, VCS
  • area: main
  • in suites: bullseye, buster
  • size: 384 kB
  • sloc: perl: 2,629; makefile: 2
file content (12 lines) | stat: -rw-r--r-- 141 bytes parent folder | download | duplicates (3)
1
2
3
4
5
6
7
8
9
10
11
12
package TestLog;
use Moose;
extends 'Catalyst::Log';

our $logged;

override warn => sub {
    my $self = shift;
    $logged = shift;
};

1;