(if (cdr ret)
(let ((rest ret)
(max-score 0)
- max-escore
+ (max-escore 0)
max-examples
max-situations)
(while rest
)
(setq buffer-read-only nil)
(erase-buffer)
- (mime-text-insert-decoded-body entity)
+ (mime-insert-text-content entity)
(mule-caesar-region (point-min) (point-max))
(set-buffer-modified-p nil)
(set-buffer mother)