Typos
[latex2e.git] / trunk / required / babel / testfiles / tlb3583.lvt
blob3889ac266ad538909afa273a3b6292602b097933
1 \iffalse
2 >Number:         3583
3 >Synopsis:       Greek characters leak into table of contents
4 >Arrival-Date:   Wed Nov 12 10:01:00 CET 2003
5 >Last-Modified:  Thu Nov 13 10:01:00 CET 2003
6 >Originator:     Daniel.Flipo@univ-lille1.fr  ( Daniel FLIPO )
7 >Release:        LaTeX2e <2001/06/01>
8 >Environment:
9  Hyphenation: Babel <v3.7j> and hyphenation patterns for english, french, german, ngerman, spanish, catalan, british, italian, portuguese, greek, russian, ukrainian, nohyphenation, loaded.
10  \@TeXversion: undefined (Standard setting for TeX3.141 and later)
11  \@currdir: macro:->./
12  \input@path: undefined (Standard setting)
13 >Description:
14 Description of bug:
16 When using the 'otherlanguage' environment to switch locally to Greek,
17 the title of a section following the piece of text in Greek
18 is printed correctly (in latin characters) in the running text
19 but in Greek characters in the table of contents.
21 No wonder: a '\select@language {polutonikogreek}' is added to
22 the .toc file... I guess  the problem does not occur only with greek,
23 but is made visible by the change of characters.
25 Another problem is that I am not able to combine the '>'
26 and the '~' accents in polutonikogreek (see >~oun below:
27 both accents are printed before the 'o' instead of above it).
29 \fi
30 \input{test2e}
31 \documentclass[a4paper,12pt]{article}
33 \START
34 \FORMAT{LaTeX2e<2001/06/01>}
35 \AUTHOR{Daniel.Flipo@univ-lille1.fr  ( Daniel FLIPO )}
36 \CLASS[a4paper,12pt]{article}
37 \PACKAGE[LGR,T1]{fontenc}
38 \PACKAGE[polutonikogreek,english]{babel}
39 \showboxbreadth=50
40 \showboxdepth=50
41 \def\testit#1{%
42   \setbox0=\vbox{#1}\showbox0}
43 \OMIT
44 \usepackage[LGR,T1]{fontenc}
45 \usepackage[polutonikogreek,english]{babel}
47 \def\st#1{\tracingonline=#1\tracingmacros=#1\tracingcommands=#1}
48 \begin{document}
49 \TIMO
51 %\section{Greek}
53 \testit{%
54 \begin{otherlanguage}{polutonikogreek}\catcode`~=12
55 t`o >'akos >~oun t`o \\
56 >en buj~w| <h >al'hjeia
57 \end{otherlanguage}
60 \testit{\section{English}}
62 %In English now!
64 % Title of section 2 (English) is printed in greek characters!
65 \testit{\tableofcontents}
67 \end{document}