From f8ad857f3386264e752ef586959b65a7219538b1 Mon Sep 17 00:00:00 2001 From: P. J. McDermott Date: Sun, 12 Aug 2012 09:29:45 -0400 Subject: Comment and clean up code. --- (limited to 'scripts/MarkdownBook/Document/Txt.pm') diff --git a/scripts/MarkdownBook/Document/Txt.pm b/scripts/MarkdownBook/Document/Txt.pm index e03a1bb..6c7f038 100644 --- a/scripts/MarkdownBook/Document/Txt.pm +++ b/scripts/MarkdownBook/Document/Txt.pm @@ -30,9 +30,11 @@ sub output open($out_fh, '>', $self->{'book'}->dir() . '/' . $self->{'file'} . '.txt'); + # Print document title. print($out_fh $self->{'title'} . "\n" . '*' x length($self->{'title'}) . "\n\n\n"); + # Print document text with macro substitutions. print($out_fh $self->{'book'}->subst_macros($self->{'source_text'})); close($out_fh); -- cgit v0.9.1