/usr/local/CPAN/BBCode-Parser/BBCode/Tag/LI.pm

• package BBCode::Tag::LI
  • BodyPermitted
  • BodyTags
  • toHTML
• EOF

# $Id: LI.pm 284 2006-12-01 07:51:49Z chronos $
package BBCode::Tag::LI;
use base qw(BBCode::Tag::Simple BBCode::Tag);
use strict;
use warnings;
our $VERSION = '0.34';

sub BodyPermitted($):method {
	return 1;
}

sub BodyTags($):method {
	# Despite previous reports to the contrary, :BLOCK is fine here
	return qw(:BLOCK :INLINE);
}

sub toHTML($):method {
	return shift->SUPER::toHTML(@_)."\n";
}

1;