Re: cut-and-paste german quotes

[Kenichi Handa <handa@m17n.org>]

Very sorry for the late response.

In article <sh3c2jkvjq.fsf@tux.gnu.franken.de>, Karl Eichwalder <ke@gnu.franken.de> writes:

> Kenichi Handa <handa@m17n.org> 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.

I see.

>>  (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.

Yes.  Your testing is helpful.  I think your preferring of
mule-unicode-0100-24ff to korean-ksc5601 is reasonable for
non-Korean lang. env.  I'll try to find a way to make Emacs
work as you expect.

---
Ken'ichi HANDA
handa@m17n.org