summaryrefslogtreecommitdiff
path: root/Master/texmf-dist/tex/latex/was/icomma.sty
blob: e3c4c72643fb9e6f1aa17708a2639f0cf9d7440d (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
34
35
36
37
38
%%
%% This is file `icomma.sty',
%% generated with the docstrip utility.
%%
%% The original source files were:
%%
%% icomma.dtx  (with options: `package')
%% 
%% IMPORTANT NOTICE:
%% 
%% For the copyright see the source file.
%% 
%% Any modified versions of this file must be renamed
%% with new filenames distinct from icomma.sty.
%% 
%% For distribution of the original source see the terms
%% for copying and modification in the file icomma.dtx.
%% 
%% This generated file may be distributed as long as the
%% original source files, as listed above, are part of the
%% same distribution. (The sources need not necessarily be
%% in the same archive or directory.)
\ProvidesPackage{icomma}
  [2002/03/10 v2.0 (WaS)]
\AtBeginDocument{%
  \mathchardef\mathcomma\mathcode`\,%
  \mathcode`\,="8000 %
}
{\catcode`,=\active
  \gdef,{\futurelet\@let@token\sm@rtcomma}
}
\def\sm@rtcomma{%
  \ifx\@let@token\@sptoken \else
  \ifx\@let@token\space \else
    \mathord\fi\fi \mathcomma}
\endinput
%%
%% End of file `icomma.sty'.