summaryrefslogtreecommitdiff
path: root/language/arabic/arabtex/texinput/acjk.sty
blob: ae8ff4bce21a5ebce2fcb35eced61b1aecc09163 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
% acjk.sty
% for CJK compatibility of ArabTeX
% or rather the other way around
% 24.10.1998
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
% (c) Klaus Lagally
%     Institut fuer Informatik
%     Universitaet Stuttgart
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
\ifx \CJK \undefined \else

\chardef \acjkatcode = \catcode`\@            \catcode`\@ = 11
\a@ident {acjk.sty} {3.08 ArabTeX extensions for CJK} {24.10.1998}

\ifx \CJK \undefined \else
\global\def\CJK@input#1{
  \makeatletter
  \edef\CJK@lscode{\noexpand\catcode`<\the\catcode`<}
  \catcode `< 12
  \endlinechar \m@ne
  \input #1\relax
  \endlinechar `\^^M
  \CJK@lscode
  \makeatother}
\fi

\catcode`\@ = \acjkatcode
\fi
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
\endinput