emacs-devel
[Top][All Lists]
Advanced

[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/                            |   (*)/'(*)




reply via email to

[Prev in Thread] Current Thread [Next in Thread]