diff options
author | Karl Berry <karl@freefriends.org> | 2013-09-17 22:11:40 +0000 |
---|---|---|
committer | Karl Berry <karl@freefriends.org> | 2013-09-17 22:11:40 +0000 |
commit | 389d70f9a442ed180389f17c2586983b861528e9 (patch) | |
tree | 3f7df46aa197a6317469dc4d65edf623b3482fdd /Master/texmf-dist/tex/xelatex/bidi/bidiftnxtra.sty | |
parent | bdc62c04f9ae222f720432f1651df51fba21f7bb (diff) |
bidi (17sep13)
git-svn-id: svn://tug.org/texlive/trunk@31682 c570f23f-e606-0410-a88d-b1316a301751
Diffstat (limited to 'Master/texmf-dist/tex/xelatex/bidi/bidiftnxtra.sty')
-rw-r--r-- | Master/texmf-dist/tex/xelatex/bidi/bidiftnxtra.sty | 212 |
1 files changed, 212 insertions, 0 deletions
diff --git a/Master/texmf-dist/tex/xelatex/bidi/bidiftnxtra.sty b/Master/texmf-dist/tex/xelatex/bidi/bidiftnxtra.sty new file mode 100644 index 00000000000..33ebba42f9b --- /dev/null +++ b/Master/texmf-dist/tex/xelatex/bidi/bidiftnxtra.sty @@ -0,0 +1,212 @@ +%% +%% This is file `bidiftnxtra.sty'. +%% +%% ______________________________________ +%% Copyright © 2009–2013 Vafa Khalighi +%% +%% License information appended. +%% +%% +\NeedsTeXFormat{LaTeX2e} +\ProvidesPackage{bidiftnxtra} +\newtoks\bidi@p@ftn +\let\FN@sf@@footnote\footnote +\let\FN@sf@@LTRfootnote\LTRfootnote +\let\FN@sf@@RTLfootnote\RTLfootnote +\def\footnote{\ifx\protect\@typeset@protect + \expandafter\FN@sf@@footnote + \else + \expandafter\FN@sf@gobble@opt + \fi +} +\def\LTRfootnote{\ifx\protect\@typeset@protect + \expandafter\FN@sf@@LTRfootnote + \else + \expandafter\FN@sf@gobble@opt + \fi +} +\def\RTLfootnote{\ifx\protect\@typeset@protect + \expandafter\FN@sf@@RTLfootnote + \else + \expandafter\FN@sf@gobble@opt + \fi +} +\edef\FN@sf@gobble@opt{\noexpand\protect + \expandafter\noexpand\csname FN@sf@gobble@opt \endcsname} +\expandafter\def\csname FN@sf@gobble@opt \endcsname{% + \@ifnextchar[%] + \FN@sf@gobble@twobracket + \@gobble +} +\def\FN@sf@gobble@twobracket[#1]#2{} +\let\FN@sf@@footnotemark\footnotemark +\def\footnotemark{\ifx\protect\@typeset@protect + \expandafter\FN@sf@@footnotemark + \else + \expandafter\FN@sf@gobble@optonly + \fi +} +\edef\FN@sf@gobble@optonly{\noexpand\protect + \expandafter\noexpand\csname FN@sf@gobble@optonly \endcsname} +\expandafter\def\csname FN@sf@gobble@optonly \endcsname{% + \@ifnextchar[%] + \FN@sf@gobble@bracket + {}% +} +\def\FN@sf@gobble@bracket[#1]{} +\def\@tabular{\if@RTL\global\@RTLtabtrue\fi + \leavevmode \hbox \bgroup + \let\@footnotetext\bidi@p@ftntext + \let\@LTRfootnotetext\bidi@p@LTRftntext + \let\@RTLfootnotetext\bidi@p@RTLftntext + \let\@xfootnotenext\bidi@p@xftntext + \let\@xfootnote\bidi@p@xfootnote + \let\@xLTRfootnotenext\bidi@p@xLTRftntext + \let\@xLTRfootnote\bidi@p@xLTRfootnote + \let\@xRTLfootnotenext\bidi@p@xRTLftntext + \let\@xRTLfootnote\bidi@p@xRTLfootnote + \if@RTLtab\beginR \fi + $\let\@acol\@tabacol + \let\@classz\@tabclassz + \let\@classiv\@tabclassiv \let\\\@tabularcr\@tabarray} +\def\endtabular{\crcr\egroup\if@RTLtab\egroup\endR\egroup\fi + \egroup $\if@RTLtab\endR\fi\egroup + \ifx\@captype\@undefined + \global\bidi@p@ftn\expandafter{\expandafter}\the\bidi@p@ftn\fi% + \global\@RTLtabfalse} +\long\def\bidi@p@ftntext#1{% + \edef\@tempy{\the\bidi@p@ftn\noexpand\footnotetext[\the\csname c@\@mpfn\endcsname]}% + \global\bidi@p@ftn\expandafter{\@tempy{#1}}}% +\long\def\bidi@p@LTRftntext#1{% + \edef\@tempyi{\the\bidi@p@ftn\noexpand\LTRfootnotetext[\the\csname c@\@mpfn\endcsname]}% + \global\bidi@p@ftn\expandafter{\@tempyi{#1}}}% +\long\def\bidi@p@RTLftntext#1{% + \edef\@tempyii{\the\bidi@p@ftn\noexpand\RTLfootnotetext[\the\csname c@\@mpfn\endcsname]}% + \global\bidi@p@ftn\expandafter{\@tempyii{#1}}}% + +\long\def\bidi@p@xftntext[#1]#2{% + \global\bidi@p@ftn\expandafter{\the\bidi@p@ftn\footnotetext[#1]{#2}}} + +\long\def\bidi@p@xLTRftntext[#1]#2{% + \global\bidi@p@ftn\expandafter{\the\bidi@p@ftn\LTRfootnotetext[#1]{#2}}} + +\long\def\bidi@p@xRTLftntext[#1]#2{% + \global\bidi@p@ftn\expandafter{\the\bidi@p@ftn\RTLfootnotetext[#1]{#2}}} + +\def\bidi@p@xfootnote[#1]{% + \begingroup + \csname c@\@mpfn\endcsname #1\relax + \unrestored@protected@xdef\@thefnmark{\thempfn}% + \endgroup + \@footnotemark\bidi@p@xftntext[#1]} + +\def\bidi@p@xLTRfootnote[#1]{% + \begingroup + \csname c@\@mpfn\endcsname #1\relax + \unrestored@protected@xdef\@thefnmark{\thempfn}% + \endgroup + \@footnotemark\bidi@p@xLTRftntext[#1]} + +\def\bidi@p@xRTLfootnote[#1]{% + \begingroup + \csname c@\@mpfn\endcsname #1\relax + \unrestored@protected@xdef\@thefnmark{\thempfn}% + \endgroup + \@footnotemark\bidi@p@xRTLftntext[#1]} + +\def\@xfloat #1[#2]{% + \@nodocument + \def \@captype {#1}% + \def \@fps {#2}% + \@onelevel@sanitize \@fps + \def \reserved@b {!}% + \ifx \reserved@b \@fps + \@fpsadddefault + \else + \ifx \@fps \@empty + \@fpsadddefault + \fi + \fi + \ifhmode + \@bsphack + \@floatpenalty -\@Mii + \else + \@floatpenalty-\@Miii + \fi + \ifinner + \@parmoderr\@floatpenalty\z@ + \else + \@next\@currbox\@freelist + {% + \@tempcnta \sixt@@n + \expandafter \@tfor \expandafter \reserved@a + \expandafter :\expandafter =\@fps + \do + {% + \if \reserved@a h% + \ifodd \@tempcnta + \else + \advance \@tempcnta \@ne + \fi + \fi + \if \reserved@a t% + \@setfpsbit \tw@ + \fi + \if \reserved@a b% + \@setfpsbit 4% + \fi + \if \reserved@a p% + \@setfpsbit 8% + \fi + \if \reserved@a !% + \ifnum \@tempcnta>15 + \advance\@tempcnta -\sixt@@n\relax + \fi + \fi + }% + \@tempcntb \csname ftype@\@captype \endcsname + \multiply \@tempcntb \@xxxii + \advance \@tempcnta \@tempcntb + \global \count\@currbox \@tempcnta + }% + \@fltovf + \fi + \global \setbox\@currbox + \color@vbox + \normalcolor + \vbox \bgroup + \let\@footnotetext\bidi@p@ftntext + \let\@LTRfootnotetext\bidi@p@LTRftntext + \let\@RTLfootnotetext\bidi@p@RTLftntext + \let\@xfootnotenext\bidi@p@xftntext + \let\@xfootnote\bidi@p@xfootnote + \let\@xLTRfootnotenext\bidi@p@xLTRftntext + \let\@xLTRfootnote\bidi@p@xLTRfootnote + \let\@xRTLfootnotenext\bidi@p@xRTLftntext + \let\@xRTLfootnote\bidi@p@xRTLfootnote + \hsize\columnwidth + \@parboxrestore + \@floatboxreset +} +\def \@endfloatbox{% + \par\vskip\z@skip %% \par\vskip\z@ added 15 Dec 87 + \@minipagefalse + \outer@nobreak + \egroup %% end of vbox + \global\bidi@p@ftn\expandafter{\expandafter}\the\bidi@p@ftn + \color@endbox +} +%% +%% Copyright © 2009–2013 Vafa Khalighi <vafakh@me.com> +%% +%% It may be distributed and/or modified under the LaTeX Project Public License, +%% version 1.3c or higher (your choice). The latest version of +%% this license is at: http://www.latex-project.org/lppl.txt +%% +%% This work is “maintained” (as per LPPL maintenance status) +%% by Vafa Khalighi. +%% +%% +%% +%% +%% End of file `bidiftnxtra.sty'. |