From: morioka Date: Tue, 20 Jul 1999 04:56:03 +0000 (+0000) Subject: (fill-cited-region): Use `if' instead of `when'. X-Git-Url: http://git.chise.org/cgi-bin/gitweb.cgi?a=commitdiff_plain;h=c040c4fcc903028101a5806832bc75fd11e2222a;p=elisp%2Fmu-cite.git (fill-cited-region): Use `if' instead of `when'. --- diff --git a/mu-cite.el b/mu-cite.el index ec059be..87ec6ed 100644 --- a/mu-cite.el +++ b/mu-cite.el @@ -429,12 +429,12 @@ TABLE defaults to the current buffer's category table." (let ((b (match-beginning 0)) (e (match-end 0))) (delete-region b e) - (when (and (> b (point-min)) - (let ((cat (char-category - (char-before b)))) - (or (string-match "a" cat) - (string-match "l" cat)))) - (insert " ")))) + (if (and (> b (point-min)) + (let ((cat (char-category + (char-before b)))) + (or (string-match "a" cat) + (string-match "l" cat)))) + (insert " ")))) (goto-char (point-min)) (fill-region (point-min) (point-max))))))