# -*- perl -*- Lintian::Mask # # Copyright (C) 2021 Felix Lechner # # This program is free software; you can redistribute it and/or modify it # under the terms of the GNU General Public License as published by the Free # Software Foundation; either version 2 of the License, or (at your option) # any later version. # # This program is distributed in the hope that it will be useful, but WITHOUT # ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or # FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License for # more details. # # You should have received a copy of the GNU General Public License along with # this program. If not, see . package Lintian::Mask; use v5.20; use warnings; use utf8; use Const::Fast; const my $EMPTY => q{}; use Moo; use namespace::clean; =head1 NAME Lintian::Mask - access to mask data =head1 SYNOPSIS use Lintian::Mask; =head1 DESCRIPTION Lintian::Mask provides access to mask data. =head1 INSTANCE METHODS =over 4 =item screen =item excuse =cut has screen => (is => 'rw', default => $EMPTY); has excuse => (is => 'rw', default => $EMPTY); =back =head1 AUTHOR Originally written by Felix Lechner for Lintian. =head1 SEE ALSO lintian(1) =cut 1; # Local Variables: # indent-tabs-mode: nil # cperl-indent-level: 4 # End: # vim: syntax=perl sw=4 sts=4 sr et