# -*- perl -*- Lintian::Processable::Control::Conffiles # # Copyright © 2019 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::Processable::Control::Conffiles; use v5.20; use warnings; use utf8; use Lintian::Conffiles; use Moo::Role; use namespace::clean; =head1 NAME Lintian::Processable::Control::Conffiles - access to collected control data for conffiles =head1 SYNOPSIS use Lintian::Processable; =head1 DESCRIPTION Lintian::Processable::Control::Conffiles provides an interface to control data for conffiles. =head1 INSTANCE METHODS =over 4 =item conffiles =cut has conffiles => ( is => 'rw', lazy => 1, default => sub { my ($self) = @_; my $file = $self->control->resolve_path('conffiles'); my $conffiles = Lintian::Conffiles->new; $conffiles->parse($file, $self); return $conffiles; }); =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