summaryrefslogtreecommitdiff
path: root/Master/texmf-dist/tex/latex/textualicomma
diff options
context:
space:
mode:
authorKarl Berry <karl@freefriends.org>2017-12-03 22:20:29 +0000
committerKarl Berry <karl@freefriends.org>2017-12-03 22:20:29 +0000
commitb712a410446a2d7a83b3c84c4cef0dcf4a653848 (patch)
treeaac6ae32f9c0566fb8eb4fccd3477a4cf6405035 /Master/texmf-dist/tex/latex/textualicomma
parent0a0b0de2788454509ea578118b40418158981fb1 (diff)
textualicomma (3dec17)
git-svn-id: svn://tug.org/texlive/trunk@45980 c570f23f-e606-0410-a88d-b1316a301751
Diffstat (limited to 'Master/texmf-dist/tex/latex/textualicomma')
-rw-r--r--Master/texmf-dist/tex/latex/textualicomma/textualicomma.sty68
1 files changed, 68 insertions, 0 deletions
diff --git a/Master/texmf-dist/tex/latex/textualicomma/textualicomma.sty b/Master/texmf-dist/tex/latex/textualicomma/textualicomma.sty
new file mode 100644
index 00000000000..91afc703dd3
--- /dev/null
+++ b/Master/texmf-dist/tex/latex/textualicomma/textualicomma.sty
@@ -0,0 +1,68 @@
+%%
+%% This is file `textualicomma.sty',
+%% generated with the docstrip utility.
+%%
+%% The original source files were:
+%%
+%% textualicomma.dtx (with options: `package')
+%%
+%% textualicomma.dtx
+%% Copyright 2017 Sebastian Friedl
+%%
+%% This work may be distributed and/or modified under the
+%% conditions of the LaTeX Project Public License, either version 1.3c
+%% of this license of (at your option) any later version.
+%% The latest version of this license is in
+%% http://www.latex-project.org/lppl.txt
+%% and version 1.3c or later is part of all distributions of LaTeX
+%% version 2008/05/04 or later.
+%%
+%% This work has the LPPL maintenance status `maintained'.
+%% Current maintainer of the work is Sebastian Friedl
+%%
+%% This work consists of the files textualicomma.dtx and
+%% textualicomma.ins and the derived file textualicomma.sty
+%%
+%% \CharacterTable
+%% {Upper-case \A\B\C\D\E\F\G\H\I\J\K\L\M\N\O\P\Q\R\S\T\U\V\W\X\Y\Z
+%% Lower-case \a\b\c\d\e\f\g\h\i\j\k\l\m\n\o\p\q\r\s\t\u\v\w\x\y\z
+%% Digits \0\1\2\3\4\5\6\7\8\9
+%% Exclamation \! Double quote \" Hash (number) \#
+%% Dollar \$ Percent \% Ampersand \&
+%% Acute accent \' Left paren \( Right paren \)
+%% Asterisk \* Plus \" Comma \,
+%% Minus \- Point \. Solidus \/
+%% Colon \: Semicolon \; Less than \<
+%% Equals \= Greater than \> Question mark \?
+%% Commercial at \@ Left bracket \[ Backslash \\
+%% Right bracket \] Circumflex \^ Underscore \_
+%% Grave accent \` Left brace \{ Vertical bar \|
+%% Right brace \} Tilde \~}
+\ProvidesPackage{textualicomma}[2017/12/03 textualicomma package]
+\def\mathtxtcmmaffamily{\rmfamily}
+\newif\if@mathtxtcmmasffamily
+\@mathtxtcmmasffamilyfalse
+\DeclareOption{sffamily}{\@mathtxtcmmasffamilytrue}
+\newif\if@mathtxtcmmattfamily
+\@mathtxtcmmattfamilyfalse
+\DeclareOption{ttfamily}{\@mathtxtcmmattfamilytrue}
+\ProcessOptions
+\if@mathtxtcmmasffamily\def\mathtxtcmmaffamily{\sffamily}\fi
+\if@mathtxtcmmattfamily\def\mathtxtcmmaffamily{\ttfamily}\fi
+\def\textualicommafont#1{\def\mathtxtcmmaffamily{#1}}
+\AtBeginDocument{%
+ \def\mathtextcomma{\text{\mathtxtcmmaffamily,}}
+ \mathchardef\mathcomma\mathcode`\,%
+ \mathcode`\,="8000 %
+}
+{\catcode`,=\active
+ \gdef,{\futurelet\@let@token\sm@rtcomma}
+}
+\def\sm@rtcomma{%
+ \ifx\@let@token\@sptoken\mathtextcomma\protect\,\else
+ \ifx\@let@token\space \else
+ \mathtextcomma\fi\fi}
+\DeclareMathSymbol{.}{\mathalpha}{operators}{`.}
+\endinput
+%%
+%% End of file `textualicomma.sty'.