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: Kenichi Handa
Subject: Re: cut-and-paste german quotes
Date: Thu, 19 Aug 2004 20:22:53 +0900 (JST)
User-agent: SEMI/1.14.3 (Ushinoya) FLIM/1.14.2 (Yagi-Nishiguchi) APEL/10.2 Emacs/21.3 (sparc-sun-solaris2.6) MULE/5.0 (SAKAKI)

Sorry for the late response again.

In article <address@hidden>, address@hidden writes:

>>  When I open that URL by mozilla and paste that name into
>>  Emacs, I get 0x51031 (which is what you want) for d-dash.
>>  In what locale, are you running your browser?

> en_US.UTF-8

I tested mozilla started with that locale, but still can't
reproduce the problem.   The version of my mozilla is:

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.

>>  What is the value of last-coding-system-used just after you paste the
>>  name?

> last-coding-system-used's value is 
> compound-text-with-extensions

I want you to test these two methods (each independently).

(1) Force Emacs to request only UTF8_STRING on receiving
    selection.

(setq x-select-request-type 'UTF8_STRING)

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

---
Ken'ichi HANDA
address@hidden





reply via email to

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