[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
Re: cut-and-paste german quotes
From: |
Karl Eichwalder |
Subject: |
Re: cut-and-paste german quotes |
Date: |
Thu, 19 Aug 2004 17:16:25 +0200 |
User-agent: |
Gnus/5.110003 (No Gnus v0.3) Emacs/21.3.50 (gnu/linux) |
Kenichi Handa <address@hidden> writes:
> Mozilla/5.0 (X11; U; Linux i686; en-US; rv:1.0.0) Gecko/20020623
> Debian/1.0.0-0.woody.1
>
> What is yours? I suspect that your mozilla doesn't use
> UTF8_STRING somehow.
It looks the like. Mine is
"Mozilla/5.0 (X11; U; Linux i686; en-US; rv:1.6) Gecko/20040114"
> (1) Force Emacs to request only UTF8_STRING on receiving
> selection.
>
> (setq x-select-request-type 'UTF8_STRING)
This way it work. I'm inclined to switch to this setting.
> (2) Force compound-text-with-extensions to translate latin
> characters in korean-ksc5601 to mule-unicode-0100-24ff.
>
> (coding-system-put
> 'compound-text-with-extensions
> 'translation-table-for-decode
> (make-translation-table
> (let ((row #x21) (row-to #x2F)
> col char unicode map)
> (while (<= row row-to)
> (setq col #x21)
> (while (<= col #x7E)
> (setq char (make-char 'korean-ksc5601 row col)
> unicode (encode-char char 'ucs))
> (if (and unicode (>= unicode #x80))
> (setq map (cons (cons char (decode-char 'ucs unicode)) map)))
> (setq col (1+ col)))
> (setq row (1+ row)))
> map)))
This also works even it I use it in combination with
(setq x-select-request-type '(COMPOUND_TEXT UTF8_STRING TEXT STRING))
Thanks for your debugging hints; I hope you can make use of my testing.
Karl
--
| ,__o
| _-\_<,
http://www.gnu.franken.de/ke/ | (*)/'(*)