Re: Diacritical marks

["C.S. Dalawat" <dalawat@mri.ernet.in>]

[-- Warning: decoded text below may be mangled, UTF-8 assumed --]
[-- Attachment #1: Type: text/plain, Size: 3658 bytes --]

My email to Reingold yesterday, brought up to date :

> Date: 24 Mar 2002 11:53:31 +0530
> From: "C.S. Dalawat" <dalawat@mri.ernet.in>
> To: reingold@emr.cs.iit.edu
> Subject: another possible solution
> Reply-to: dalawat@mri.ernet.in
> 
> I'm quite pleased to discover the following trick.  Thanks for having
> brought up the topic again ; I'll certainly be using this trick
> constantly in my work.
> 
> We allow diary entries or month names to contain accented characters,
> they get passed on to the Diary or the Calendar buffer as they are and
> will get displayed correctly if the user has set
> 
> (standard-display-european 1).
> 
> When TeXing the Calendar, cal-tex.el passes on the accented characters
> to calendar.tex as they are.  No substitutions.  But now calendar.tex
> contains the magic incantations
> 
> \catcode`\É=\active \defÉ{{\'E}}
> \catcode`\È=\active \defÈ{{\`E}}
> \catcode`\Ê=\active \defÊ{{\^E}}
> \catcode`\Ë=\active \defË{{\"E}}
> \catcode`\À=\active \defÀ{{\`A}}
> \catcode`\Â=\active \defÂ{{\^A}}
> \catcode`\Î=\active \defÎ{{\^I}}
> \catcode`\Ï=\active \defÏ{{\"I}}
> \catcode`\Ô=\active \defÔ{{\^O}}
> \catcode`\Ù=\active \defÙ{{\`U}}
> \catcode`\Û=\active \defÛ{{\^U}}
> \catcode`\Ç=\active \defÇ{{\c C}}
> 
> \catcode`\é=\active \defé{{\'e}}
> \catcode`\è=\active \defè{{\`e}}
> \catcode`\ê=\active \defê{{\^e}}
> \catcode`\ë=\active \defë{{\"e}}
> \catcode`\à=\active \defà{{\`a}}
> \catcode`\â=\active \defâ{{\^a}}
> \catcode`\î=\active \defî{{\^\i}}
> \catcode`\ï=\active \defï{{\"\i}}
> \catcode`\ô=\active \defô{{\^o}}
> \catcode`\ù=\active \defù{{\`u}}
> \catcode`\û=\active \defû{{\^u}}
> \catcode`\ç=\active \defç{{\c c}}
> 
> No need for any special fonts like ec, which some users might not
> have.  cm will do.  
> 
> Other accented characters could be included among the \active ones ;
> for example the German ß could be handled by adding the line
>
> \catcode`\ß=\active \defß{{\ss}}.
> 
> Try out the following (plain) TeX file diacritical.tex :
> 
% diacritical.tex begins here

\catcode`\É=\active \defÉ{{\'E}}
\catcode`\È=\active \defÈ{{\`E}}
\catcode`\Ê=\active \defÊ{{\^E}}
\catcode`\Ë=\active \defË{{\"E}}
\catcode`\À=\active \defÀ{{\`A}}
\catcode`\Â=\active \defÂ{{\^A}}
\catcode`\Î=\active \defÎ{{\^I}}
\catcode`\Ï=\active \defÏ{{\"I}}
\catcode`\Ô=\active \defÔ{{\^O}}
\catcode`\Ù=\active \defÙ{{\`U}}
\catcode`\Û=\active \defÛ{{\^U}}
\catcode`\Ç=\active \defÇ{{\c C}}

\catcode`\é=\active \defé{{\'e}}
\catcode`\è=\active \defè{{\`e}}
\catcode`\ê=\active \defê{{\^e}}
\catcode`\ë=\active \defë{{\"e}}
\catcode`\à=\active \defà{{\`a}}
\catcode`\â=\active \defâ{{\^a}}
\catcode`\î=\active \defî{{\^\i}}
\catcode`\ï=\active \defï{{\"\i}}
\catcode`\ô=\active \defô{{\^o}}
\catcode`\ù=\active \defù{{\`u}}
\catcode`\û=\active \defû{{\^u}}
\catcode`\ç=\active \defç{{\c c}}

Ma chère maman,\smallskip
depuis ton départ tout le monde s'ennuie ici. Nous
allons très souvent chez M Foucher, ainsi que tu
nous l'as recommandé. Il nous a proposé de suivre
les leçons qu'on donne à son fils ; nous l'avons
remercié. Nous travaillons tous les matins le latin
et les mathématiques. Une lettre cachetée de noir
et adressée à Abel est arrivée le soir de ton
départ. M Foucher vous la fera passer. Il a eu la
bonté de nous mener au muséum.
Reviens bien vite. Sans toi nous ne savons que dire
et que faire, nous sommes tout embarrassés. Nous
ne cessons de penser à toi. Maman ! Maman !\smallskip
Ton fils respectueux.\smallskip
Victor.

\bye

% diacritical.tex endshere

_______________________________________________
Emacs-devel mailing list
Emacs-devel@gnu.org
http://mail.gnu.org/mailman/listinfo/emacs-devel