diff options
author | Karl Berry <karl@freefriends.org> | 2017-12-03 22:20:29 +0000 |
---|---|---|
committer | Karl Berry <karl@freefriends.org> | 2017-12-03 22:20:29 +0000 |
commit | b712a410446a2d7a83b3c84c4cef0dcf4a653848 (patch) | |
tree | aac6ae32f9c0566fb8eb4fccd3477a4cf6405035 /Master/texmf-dist/tex/latex/textualicomma | |
parent | 0a0b0de2788454509ea578118b40418158981fb1 (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.sty | 68 |
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'. |