File Coverage

blib/lib/PDF/Builder/Outlines.pm

Criterion	Covered	Total	%
statement	18	18	100.0
branch			n/a
condition			n/a
subroutine	6	6	100.0
pod	2	2	100.0
total	26	26	100.0

package PDF::Builder::Outlines;

use base 'PDF::Builder::Outline';

use strict;
use warnings;

our $VERSION = '3.028'; # VERSION
our $LAST_UPDATE = '3.027'; # manually update whenever code is changed

use PDF::Builder::Basic::PDF::Utils;

=head1 NAME

PDF::Builder::Outlines - Further Outline handling

Inherits from L<PDF::Builder::Outline>

This creates the I<root> of any collection of Outline entries. It is thus
limited to one instance in a document, although it may be called multiple
times to provide the root to Outline calls (see Examples).

=cut

sub new {
    my ($class, $api) = @_;

    # creates a new Outlines object only if one doesn't already exist
    my $self = $class->SUPER::new($api);
    $self->{'Type'} = PDFName('Outlines');

    return $self;
}

sub count {
    my $self = shift();
    return abs($self->SUPER::count());
}

1;