help-gnu-emacs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

Re: displaying the Eurosign at all


From: Pascal Bourguignon
Subject: Re: displaying the Eurosign at all
Date: 07 Mar 2005 16:28:18 +0100
User-agent: Gnus/5.09 (Gnus v5.9.0) Emacs/21.3

Josef Dalcolmo <dalcolmo@vh-s.de> writes:

> I still have problems with the EURO sign:
> 
> At 08 Oct 2002 11:36:48 +0200,
> Klaus Berndl wrote:
> ...
> > (global-set-key (kbd "\200") 'insert-euro)
> 
> This works, e.g. I see a Euro sign in the current buffer. However
> there is no Euro sign character (latin-9) in the file, even though my
> default language environment is set to Latin-9.
> 
> When I insert a EURO character with another editor (for example
> SciTE) into a file, then Emacs still shows it as \200.
> 
> So, something is still wrong, but what?

Here is what I have in my ~/.emacs:

(when (fboundp 'unify-8859-on-encoding-mode)
  (unify-8859-on-encoding-mode 1))
(when (fboundp 'unify-8859-on-decoding-mode)
  (unify-8859-on-decoding-mode 1))

(setq default-enable-multibyte-characters      t
      unibyte-display-via-language-environment nil)

;; If we got Latin-9 take it:
(setq my-latin (if (assoc-ignore-case "Latin-9" language-info-alist) 9 1))
;; For coding-system we don't specify *-unix to allow it to load DOS files.
(cond
 ((= my-latin 1) (setq my-lenv     "Latin-1"
                       my-encoding 'iso-8859-1))
 ((= my-latin 9) (setq my-lenv     "Latin-9"
                       my-encoding 'iso-8859-15))
 (t (error "Invalid value for my-latin variable.")))

(set-language-environment my-lenv)
(prefer-coding-system my-encoding)


Then I type in € with C-x 8 $ 
and it shows like an euro, and when I load files containing \200, 
they are interpreted as Latin-9 (iso-8859-15) files and these
characters show as euros.

Of course, it helps to have X fonts with iso-8859-15 characters too.

-- 
__Pascal_Bourguignon__               _  Software patents are endangering
()  ASCII ribbon against html email (o_ the computer industry all around
/\  1962:DO20I=1.100                //\ the world http://lpf.ai.mit.edu/
    2001:my($f)=`fortune`;          V_/   http://petition.eurolinux.org/


reply via email to

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