[Quotecolors] QC 0.2

[Terrence Brannon]

Jean-Michel MEYER wrote:

>Hello,
>I've installed QC 0.2 and it seems to work perfectly. 
>
It works fine for viewing quoted messages, but when I edit a message, 
the messages do not display with the various quote-level colors... in 
0.1C, the messages would have the different colors as you edited it for 
reply

For example, this message will come back with quote coloring, but as I 
write it, I do not see the quoted text above in colors.

-- 
  (let recur ((lis x) (k k)) 
    (if (zero? k) (values '() lis) 
	(receive (prefix suffix) (recur (cdr lis) (- k 1)) 
	  (values (cons (car lis) prefix) suffix)))))