diff options
Diffstat (limited to 'render.f90')
-rw-r--r-- | render.f90 | 6 |
1 files changed, 4 insertions, 2 deletions
@@ -410,6 +410,7 @@ contains allocate(breaks(1)) breaks(1) = len_trim(text) + do while(r%preformatted_width(text(1:breaks(1))) > r%max_width) breaks(1) = breaks(1) - 1 end do @@ -440,7 +441,8 @@ contains startpos = get_start_position_and_type(text, proportional_type) endpos = wrap_line(r, text, startpos, proportional_type) - do while(endpos > startpos) + + do while(endpos >= startpos) ! Save this break break_count = break_count + 1 @@ -521,7 +523,7 @@ contains endpos = len_trim(text) end if - do while(endpos > startpos) + do while(endpos >= startpos) if(r%is_text_visible(text(startpos:endpos))) then call r%draw_proportional(text(startpos:endpos), & text_type=proportional_type) |