# -*- perl -*- # Lintian::Profile::Manual::References # Copyright © 2020 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::Profile::Manual::References; use v5.20; use warnings; use utf8; use Lintian::Data::Manual::References; use Moo::Role; use namespace::clean; =head1 NAME Lintian::Profile::Manual::References - Lintian interface to manual references =head1 SYNOPSIS my $profile = Lintian::Profile->new; =head1 DESCRIPTION Lintian::Profile::Manual::References provides an interface to manual references. =head1 INSTANCE METHODS =over 4 =item manual_references =cut has manual_references => ( is => 'rw', lazy => 1, default => sub { my ($self) = @_; my $manuals = Lintian::Data::Manual::References->new; $manuals->load($self->data_paths, $self->our_vendor); return $manuals; }); =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