Permalink
Browse files

Add a blank space at the end of each line.

  • Loading branch information...
1 parent 4b005a1 commit 3fb39c6c69d815479d7469cb3b121479f0bca64b @angelortega committed Feb 4, 2010
Showing with 6 additions and 4 deletions.
  1. +6 −4 Grutatxt.pm
View
@@ -1913,13 +1913,13 @@ The additional parameters for a new Grutatxt object are:
=item I<normal-size>
-The point size of normal text. By default is 10.
+The point size of normal text. By default is 20.
=item I<heading-sizes>
This argument must be a reference to an array containing
the size in points of the 3 different heading levels. By
-default, level sizes are [ 20, 18, 15 ].
+default, level sizes are [ 34, 30, 28 ].
=back
@@ -1946,15 +1946,15 @@ sub _prefix
{
my $gh = shift;
- $gh->_push('{\rtf1\ansi {\plain \fs' . $gh->{'normal-size'} . ' \sa227 ');
+ $gh->_push('{\rtf1\ansi {\plain \fs' . $gh->{'normal-size'} . ' \sa227');
}
sub _empty_line
{
my $gh = shift;
- return '\par ';
+ return '\par';
}
@@ -1991,6 +1991,8 @@ sub _postfix
{
my $gh = shift;
+ @{$gh->{o}} = map { $_ . ' '; } @{$gh->{o}};
+
$gh->_push('}}');
}

0 comments on commit 3fb39c6

Please sign in to comment.