(cons
elmo-spam-spamassassin-learn-program
elmo-spam-spamassassin-learn-program-arguments))
- (t (error "Internal error.")))))
+ (t (error "Internal error")))))
(apply #'call-process-region
(point-min) (point-max)
(car pair)
(error
"non-positive value for `elmo-spam-spamassassin-max-messages-per-process'"))
(with-temp-buffer
- (buffer-disable-undo (current-buffer))
(while numbers
(let ((count 0))
(while (and numbers