Commit 1e660395 authored by Ted Zlatanov's avatar Ted Zlatanov Committed by Katsumi Yamaoka
Browse files

message.el (message-yank-original): Use cond instead of CL case.

parent c6eee9aa
2011-03-15 Teodor Zlatanov <tzz@lifelogs.com>
* message.el (message-yank-original): Use cond instead of CL case.
2011-03-15 Stefan Monnier <monnier@iro.umontreal.ca>
 
* auth-source.el (auth-source-netrc-create): Use usual format for the
......
......@@ -3748,13 +3748,13 @@ prefix, and don't delete any headers."
(goto-char (mark t))
(insert-before-markers ?\n)
(goto-char pt))))
(case message-cite-reply-position
('above
(cond
((eq 'above message-cite-reply-position)
(message-goto-body)
(insert body-text)
(insert (if (bolp) "\n" "\n\n"))
(message-goto-body))
('below
((eq 'below message-cite-reply-position)
(message-goto-signature)))
;; Add a `message-setup-very-last-hook' here?
;; Add `gnus-article-highlight-citation' here?
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment