Convert::Wiki::Node::Para - Represents a text paragraph node

	use Convert::Wiki::Node::Para;

	my $para = Convert::Wiki::Node->new( txt => 'Foo is a foobar.', type => 'para' );

	print $para->as_wiki();

#############################################################################
# (c) by Tels 2004. Part of Convert::Wiki
#
# represents a text paragraph node
#############################################################################

package Convert::Wiki::Node::Para;

use 5.006001;
use strict;
use warnings;

use Convert::Wiki::Node;
use Text::Format;

use vars qw/$VERSION @ISA $formatter/;

@ISA = qw/Convert::Wiki::Node/;

$VERSION = '0.03';

#############################################################################

BEGIN
  {
  $formatter= Text::Format->new( { 
    columns => 76,
    firstIndent => 0,
    } );
  }

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

  $self->SUPER::_init($args);

  $self->{txt} =~ s/\n/ /g;	# remove all newlines

  $self;
  }

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

  $txt = $formatter->format($txt);

  $txt =~ s/\n\z//;		# last newline
  $txt .= "\n\n";
  }

1;
__END__