>>>> "SO" == Serge Olkhowik writes:
SO> Но вот такой вопрос у меня еще есть - можно ли SC научить шаблонам
SO> цитирования писем? Дело в том, что у меня на работе принят формат
SO> цитирования Outlook, т.е. вверху текст письма, затем ---Original
SO> Message---, и далее текст оригинала с основными полями. Может
SO> кто-то знает ссылки, где подобное можно найти?
SO> В принципе, можно самому такое нарисовать, но я еще не настолько
SO> силен в lisp. Или это лучше переложить на плечи MUA? (хотя при этом
SO> sc-cite-original обычно прописывается в mail-setup-hook).
Если я верно тебя понял, то функция для цитирования будет чем-то подобным:
(defun sc-vk-header-outlookish-attribution ()
"Outlookish attribution"
(let ((sc-mumble "")
(whofrom (sc-whofrom)))
(if whofrom
(insert
"----- Original Message -----\n"
"From: "
(sc-hdr (sc-mail-field "sc-author") " ")
(or (sc-hdr "<" (sc-mail-field "sc-from-address")
">" t)
(sc-hdr "<" (sc-mail-field "sc-reply-address")
">" t)
"")
"\n"
(sc-hdr "Sent: " (sc-mail-field "date") "\n")
(sc-hdr "Subject: " (sc-mail-field "subject") "\n")))))
Подключаешь ее в sc-rewrite-header-list и твикаешь
sc-preferred-header-style. И цитируй как ауглюки. Только зачем? =))
---Vas