|
|
ru.linux- RU.LINUX --------------------------------------------------------------------- From : Gennady Terehov 2:5020/400 06 Jan 2003 06:41:27 To : Igor Suvorov Subject : Re: а это - не хрень -------------------------------------------------------------------------------- On Sun, Jan 05, 2003 at 07:29:54AM +0000, Igor Suvorov wrote: [skip] > > Вот гад, русские буквы в сабджекте в iso-8859-5 перекодировал :( > > (setq rfc2047-header-encoding-alist > '( > ("Subject" . nil) > ) > ) > (setq message-default-charset 'koi8-r > rfc2047-header-encoding-alist '((t . t))) > Hихрена не помогает твой совет, как и все предыдущие советы про rfc2047-header-encoding-alist :((( Вариантов много было, а ни один не работает :( С твоим хоть шлюз Интернет-Фидо стал постинги пропускать, но все равно, гадский ГHУс поле Subject в iso-8859-5 перекодирует :( И в отправляемых via e-mail письмах тоже. Чтение Emacs-MIME Manual (http://www.sunsite.ualberta.ca/Documentation/Gnu/emacs-21.1/html_node/emacs-mim +e_6.html) просветления не дал :( Разве что там не rfc2047-header-encoding-alist, а rfc2047-header-encoding-list ... Hа всякий случай (с надеждой на помощь в решении проблемы) цитирую тут свой ~/.gnus. (setq gnus-select-method '(nntp "news.myprovider.ru")) (setq gnus-group-line-format "%M%S%5y: %(%-25g%) %D\n") (setq gnus-visible-headers "^From:\\|^Subject:|^User-Agent:") (setq gnus-thread-hide-subtree t) (setq gnus-summary-line-format "%U%R%z%I %4t %(%[ %-20,20n %]%) %s\n") (setq sc-preferred-attribution-list '("initials")) (standard-display-8bit 128 255) (add-hook 'gnus-summary-mode-hook '(lambda () (local-set-key [tab] 'gnus-summary-next-unread-article) ) ) (add-hook 'message-setup-hook '(lambda () (save-excursion (goto-char (point-min)) (next-line 2) (newline) (goto-char (point-min)) (next-line 2) (insert "FCC: ~/mail/Posted") ) ) ) ;; X-Comment-To ;; Злобно похищен из ~/.emacs Бориса Тоботраса (add-hook 'message-setup-hook '(lambda () ;; Add X-Comment-To: field. We need From: field from original ;; letter. How to get right? (if message-reply-buffer (let ((cur-buffer (current-buffer)) from-field) (save-excursion (set-buffer message-reply-buffer) (if (string-match "^From: " (buffer-string)) (progn (setq from-start (+ (match-end 0) 1)) (goto-char from-start) (end-of-line) (setq from-field (buffer-substring from-start (point )))))) (if from-field (save-excursion (goto-char (point-min)) (insert "X-Comment-To: " (Make-Comment-To from-field) "\n"))))))) (defun Make-Comment-To (from) (if (string-match " *<.*> *" from) (concat (substring from 0 (match-beginning 0)) (substring from (match-end 0))) (if (string-match "\(.*\)" from) (substring from (+ (match-beginning 0) 1) (- (match-end 0) 1)) from))) ;;согласно <443345598%m3ptrfkdf5.fsf@localhost.localdomain> ;;(set-alist 'rfc2047-header-encoding-alist "Subject" 'default) ;;(set-alist 'rfc2047-header-encoding-list "Subject" 'default) ;(setq rfc2047-header-encoding-alist ; '((t . default))) ;(put-alist 'koi8-r nil rfc2047-charset-encoding-alist) ;(put-alist 'iso8859-1 nil rfc2047-charset-encoding-alist) ;(setq ; rfc2047-header-encoding-alist ; (append ; '(("Subject" default)) ; rfc2047-header-encoding-alist ; ) ;) ;;вариант по Message-ID: <k7hkuk6x.fsf_-_@sauron.ru> ;;все равно Subject в iso-8859-5 перекодирует (setq rfc2047-header-encoding-alist '( ("Subject" . nil) ) ) (setq message-default-charset 'koi8-r rfc2047-header-encoding-alist '((t . t))) (require 'smtpmail) (setq smtpmail-smtp-server "myprovider.ru") (setq smtpmail-default-smtp-server "myprovider.ru") (setq send-mail-function 'smtpmail-send-it) (setq message-send-mail-function 'smtpmail-send-it) (setq user-full-name "Gennady Terehov") (setq smtpmail-local-domain "myprovider.ru") (setq user-mail-address (concat "user@" smtpmail-local-domain)) (gnus-agentize) -- Отправлено через сервер Форумы@mail.ru - http://talk.mail.ru --- ifmail v.2.15dev5 * Origin: Talk.Mail.Ru (2:5020/400) Вернуться к списку тем, сортированных по: возрастание даты уменьшение даты тема автор
Архивное /ru.linux/107074fd4309.html, оценка из 5, голосов 10
|