File Coverage

blib/lib/Netscape/Bookmarks/AcceptVisitor.pm

Criterion	Covered	Total	%
statement	12	13	92.3
branch	1	2	50.0
condition	1	3	33.3
subroutine	4	4	100.0
pod	0	1	0.0
total	18	23	78.2

package Netscape::Bookmarks::AcceptVisitor;

use strict;
use subs qw();
use vars qw($VERSION);

$VERSION = "2.304";

sub visitor {
	my( $self, $visitor ) = @_;

	unless( ref $visitor and $visitor->can('visit') ) {
		return;
		}

	return $visitor->visit( $self );
	}

1;

__END__