I'm sorry but this is better:) -- (setq reply-to (concatenate 'string "Binghe " "<tianchunbinghe" '(#\@) "gmail.com>")) -------------- next part -------------- An embedded and charset-unspecified text was scrubbed... Name: zh_CN.po URL: <https://mailman.common-lisp.net/pipermail/cl-debian/attachments/20051019/bea0dcab/attachment.ksh>