sergiotarxz/owlcode.tech
1
0
Fork 0
Code Issues 1 Pull Requests Releases Wiki Activity

Fixing broken words preview.

Browse Source
This commit is contained in:
sergiotarxz 2022-11-13 03:53:58 +01:00
parent 9569c05c3d
commit fb5c189f11
1 changed files with 9 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

11
lib/BurguillosInfo/Posts.pm
View File

@ -79,18 +79,25 @@ sub PostPreviewOg {
my @content_divided_in_lines = split /\n/, $content; my @content_divided_in_lines = split /\n/, $content;
my @new_content; my @new_content;
my $n_chars_per_line = 60; my $n_chars_per_line = 70;
for my $line (@content_divided_in_lines) { for my $line (@content_divided_in_lines) {
if ( length($line) <= $n_chars_per_line ) { if ( length($line) <= $n_chars_per_line ) {
push @new_content, $line; push @new_content, $line;
next; next;
} }
my $last_word = '';
while ( $line =~ /(.{1,${n_chars_per_line}})/g ) { while ( $line =~ /(.{1,${n_chars_per_line}})/g ) {
my $new_line = $1; my $new_line = $last_word.$1;
$new_line =~ s/(\S*)$//;
$last_word = $1;
push @new_content, $new_line; push @new_content, $new_line;
} }
if ($last_word) {
$new_content[$#new_content] .= $last_word;
} }
}
my $svg = $self->_GenerateSVGPostPreview( $title, \@new_content ); my $svg = $self->_GenerateSVGPostPreview( $title, \@new_content );
my ($stdout) = capture { my ($stdout) = capture {
open my $fh, '|-', qw{convert /dev/stdin png:fd:1}; open my $fh, '|-', qw{convert /dev/stdin png:fd:1};