Re: [Debian]: emacs und umlaute: Loesung zum \201-Problem
>>>>> On Mon, 26 Apr 1999 20:03:45 +0200, Holger Paulsen <paulsen@berlin.snafu.de> said:
Holger> On Sun, Apr 25, 1999 at 05:07:48PM +0200, Christian Leutloff wrote:
>> mich stört das auch. Hast Du dafür mittlerweile ne Lösung gefunden?
Holger> Jetzt habe ich sie offensichtlich. Selbstverständlich ist
Holger> dieser Bug nicht unbekannt; und Debian hat ein vorzügliches
Holger> Verfahren entwickelt, mit Bugs umzugehen. Weswegen ist mir
Holger> so etwas naheliegendes nicht eingefallen. Peter Berlau hat
Holger> mir die komplette Lösung zugesandt; ich zitiere sie hier
Holger> nicht, nur so viel:
Holger> ;; this is a workaround reported bug # 33613 on the
Holger> ;; debian tm-package due to bug in the default definition of
Holger> ;; detect-mime-charset-region
... und den hat Peter Berlau von mir:
;; this is a workaround reported bug # 33613 on the
;; debian tm-package due to bug in the default definition of
;; detect-mime-charset-region
(if (and (eq emacs-type 'fsf) (eq emacs-major-version 20)
(eq emacs-minor-version 3))
(progn
(defun detect-mime-charset-region (start end)
"Return MIME charset for region between START and END. [.emacs]"
(let ((text (buffer-substring start end)))
(or (charsets-to-mime-charset (find-charset-string text))
(if (string-match "[\200-\307]" text) default-mime-charset)
'us-ascii)))
(setq default-mime-charset 'iso-8859-1)
;; On emacs 20.3 (decode-coding-region start end 'iso8859-1)
;; produces these ugly \201 chars
(defun decode-mime-charset-region (start end charset)
"Decode the text between START and END as MIME CHARSET. [.emacs]"
(let ((cs (mime-charset-to-coding-system charset)))
(if (and cs (not (eq cs 'iso-8859-1)))
(decode-coding-region start end cs))))))
Das sieht man auch daran, daß das tm-package dann keinen charset einfügt, wie
in einer der Ursprungsnachrichten zu sehen ist:
Content-Type: text/plain; charset=NIL
Achtung: Das betrifft _nur_ das Zusammenspiel zwischen Emacs und TM, xemacs
ist davon IIRC nicht betroffen.
Peter
--
------------------------------------------------------------------------------
Peter Weiss, Riemenschneiderstraße 4, 82008 Unterhaching
------------------------------------------------------------------------------
--- The foolish ones taught more to me than the wise ones ever could ---
------------------------------------------------------------------------------
------------------------------------------------
Um sich aus der Liste auszutragen schicken Sie
bitte eine E-Mail an majordomo@jfl.de die im Body
"unsubscribe debian-user-de <deine emailadresse>"
enthaelt.
Bei Problemen bitte eine Mail an: Jan.Otto@jfl.de
------------------------------------------------
Anzahl der eingetragenen Mitglieder: 745
Reply to: