[hors-sujet] poster en latin 1 ou 9 sous Emacs 21

[Laurent Pelecq <laurent.pelecq@soleil.org>]

Boujour,

C'est hors-sujet mais ça concerne la liste. Quand on répond sous Emacs
à un courrier qui a un codage différent de celui qu'on utilise (ex:
répondre avec Latin 1 à un message codé en iso-8859-15), soit Emacs
envoie 2 parties en multipart/mixed ou il code en UTF-8 visiblement.

J'ai une fonction pour changer le codage quand on répond à un
courrier. Ce n'est pas très pratique, il faut l'exécuter avant de
commencer à écrire. Ça ne marche pas si on la met dans
message-setup-hook.

Est-ce que quelqu'un a une solution à ce problème ?

Pour info, la fonction est la suivante :

(defun guess-latin-coding-system ()
  (interactive)
  (let ((guesses (find-coding-systems-region (point-min) (point-max))))
    (catch 'done
      (while guesses
	(let ((coding-system (symbol-name (car guesses))))
	  (save-match-data
	    (if (string-match "iso-latin-\\([1-9][0-9]*\\)" coding-system)
		(let ((latin (format "Latin-%s"
				     (match-string-no-properties
				      1 coding-system))))
		  (set-language-environment latin)
		  (message "Set language environment to %s" latin)
		  (throw 'done t)))))
	(setq guesses (cdr guesses))))))

-- 
Laurent Pelecq