Fix wrapping of text lines with the same length as specified length limit

Aleksander Machniak

2013-03-18 ec27006ebeef24375dd59c2b952ce98ca8e40084

 program/lib/Roundcube/rcube_mime.php

@@ -476,13 +476,19 @@
        $q_level = 0;

        foreach ($text as $idx => $line) {
            if ($line[0] == '>' && preg_match('/^(>+\s*)/', $line, $regs)) {
                $q = strlen(str_replace(' ', '', $regs[0]));
                $line = substr($line, strlen($regs[0]));
            if ($line[0] == '>') {
                // remove quote chars, store level in $q
                $line = preg_replace('/^>+/', '', $line, -1, $q);
                // remove (optional) space-staffing
                $line = preg_replace('/^ /', '', $line);

                if ($q == $q_level && $line
                    && isset($text[$last])
                    && $text[$last][strlen($text[$last])-1] == ' '
                // The same paragraph (We join current line with the previous one) when:
                // - the same level of quoting
                // - previous line was flowed
                // - previous line contains more than only one single space (and quote char(s))
                if ($q == $q_level
                    && isset($text[$last]) && $text[$last][strlen($text[$last])-1] == ' '
                    && !preg_match('/^>+ {0,1}$/', $text[$last])
                ) {
                    $text[$last] .= $line;
                    unset($text[$idx]);
@@ -535,10 +541,12 @@

        foreach ($text as $idx => $line) {
            if ($line != '-- ') {
                if ($line[0] == '>' && preg_match('/^(>+ {0,1})+/', $line, $regs)) {
                    $level  = substr_count($regs[0], '>');
                if ($line[0] == '>') {
                    // remove quote chars, store level in $level
                    $line   = preg_replace('/^>+/', '', $line, -1, $level);
                    // remove (optional) space-staffing and spaces before the line end
                    $line   = preg_replace('/(^ | +$)/', '', $line);
                    $prefix = str_repeat('>', $level) . ' ';
                    $line   = rtrim(substr($line, strlen($regs[0])));
                    $line   = $prefix . self::wordwrap($line, $length - $level - 2, " \r\n$prefix", false, $charset);
                }
                else if ($line) {
@@ -578,7 +586,7 @@
        while (count($para)) {
            $line = array_shift($para);
            if ($line[0] == '>') {
                $string .= $line.$break;
                $string .= $line . (count($para) ? $break : '');
                continue;
            }

@@ -587,11 +595,12 @@
            while (count($list)) {
                $line   = array_shift($list);
                $l      = mb_strlen($line);
                $newlen = $len + $l + ($len ? 1 : 0);
                $space  = $len ? 1 : 0;
                $newlen = $len + $l + $space;

                if ($newlen <= $width) {
                    $string .= ($len ? ' ' : '').$line;
                    $len += (1 + $l);
                    $string .= ($space ? ' ' : '').$line;
                    $len += ($space + $l);
                }
                else {
                    if ($l > $width) {