bidi (26sep18)

git-svn-id: svn://tug.org/texlive/trunk@48769 c570f23f-e606-0410-a88d-b1316a301751

4 files changed, 84 insertions, 43 deletions

diff --git a/Master/texmf-dist/source/xelatex/bidi/bidi-doc-intro.ltx b/Master/texmf-dist/source/xelatex/bidi/bidi-doc-intro.ltx
index 6835ebec849..bb2035fafa4 100644
--- a/Master/texmf-dist/source/xelatex/bidi/bidi-doc-intro.ltx
+++ b/Master/texmf-dist/source/xelatex/bidi/bidi-doc-intro.ltx
@@ -19,7 +19,7 @@ If you use \textsf{bidi} package to write any input \TeX\ document, and then run
 * 
 * Copyright (c) 2009--2018 Vafa Khalighi
 * 
-* v33.8, 2018/09/26
+* v33.9, 2018/09/27
 * 
 * License: LaTeX Project Public License, version
 * 1.3c or higher (your choice)
diff --git a/Master/texmf-dist/source/xelatex/bidi/bidi-doc-title.ltx b/Master/texmf-dist/source/xelatex/bidi/bidi-doc-title.ltx
index 94c71bd0759..5c11d0a657e 100644
--- a/Master/texmf-dist/source/xelatex/bidi/bidi-doc-title.ltx
+++ b/Master/texmf-dist/source/xelatex/bidi/bidi-doc-title.ltx
@@ -3,7 +3,7 @@
 \begin{document}
 \title{\textcolor{blue!65!black}{\Huge The \textsf{bidi} \textit{Package}}\\
 \LARGE Bidirectional typesetting in plain \TeX{} and \LaTeX, using \XeTeX{} engine\\[5pt]
-\large User documentation for \textcolor{blue!65!black}{version 33.8}}
+\large User documentation for \textcolor{blue!65!black}{version 33.9}}
  \author{Vafa Khalighi\\
   \url{persian-tex@tug.org}}
 \setcounter{page}{0}
@@ -14,7 +14,7 @@
 \textcolor{blue!65!black}{\Huge The \textsf{bidi} \textit{Package}}
 
 \Large
-User documentation for \textcolor{blue!65!black}{version 33.8}}
+User documentation for \textcolor{blue!65!black}{version 33.9}}
 
 \vskip 0pt plus 3fill
 \textit{\large to my Master, \textbf{Ferdowsi The Great}}
diff --git a/Master/texmf-dist/source/xelatex/bidi/bidi-doc.ltx b/Master/texmf-dist/source/xelatex/bidi/bidi-doc.ltx
index eb8a4da1e05..71c5a9d522c 100644
--- a/Master/texmf-dist/source/xelatex/bidi/bidi-doc.ltx
+++ b/Master/texmf-dist/source/xelatex/bidi/bidi-doc.ltx
@@ -1,7 +1,7 @@
 \documentclass{ltxdoc}
 \input{bidi-doc-preamble.ltx}
 \hypersetup{%
-  pdftitle={User documentation for version 33.8 of the bidi
+  pdftitle={User documentation for version 33.9 of the bidi
                 package}%
 }
 \begin{document}
diff --git a/Master/texmf-dist/source/xelatex/bidi/bidi.dtx b/Master/texmf-dist/source/xelatex/bidi/bidi.dtx
index 0dc0522f7c9..67e0acc0094 100644
--- a/Master/texmf-dist/source/xelatex/bidi/bidi.dtx
+++ b/Master/texmf-dist/source/xelatex/bidi/bidi.dtx
@@ -5,7 +5,7 @@
 %<*readme>
 ___________________
 The bidi package
-v33.8
+v33.9
 
 This package provides a convenient interface for typesetting
 bidirectional texts in Plain TeX and LaTeX, using XeTeX engine.
@@ -46,7 +46,7 @@ mailing list. You can subscribe to the mailing list at
   <https://lists.sourceforge.net/lists/listinfo/persian-tex-dist-discuss>
   
   
-Current version release date: 2018/09/26
+Current version release date: 2018/09/27
 
 ___________________
 Vafa Khalighi
@@ -243,7 +243,7 @@ by Vafa Khalighi.
 \documentclass{ltxdoc}
 \input{bidi-doc-preamble.ltx}
 \hypersetup{%
-  pdftitle={Source documentation for version 33.8 of the bidi
+  pdftitle={Source documentation for version 33.9 of the bidi
                 package}%
 }
 \EnableCrossrefs
@@ -262,7 +262,7 @@ by Vafa Khalighi.
 % \GetFileInfo{\jobname.dtx}
 % \title{\textcolor{blue!65!black}{\Huge The \textsf{bidi} \textit{Package}}\\
 %\LARGE Bidirectional typesetting in plain \TeX{} and \LaTeX, using \XeTeX{} engine\\[5pt]
-%\large Source documentation for \textcolor{blue!65!black}{version 33.8}}
+%\large Source documentation for \textcolor{blue!65!black}{version 33.9}}
 % \author{Vafa Khalighi\\
 %  \url{persian-tex@tug.org}}
 %\setcounter{page}{0}
@@ -273,7 +273,7 @@ by Vafa Khalighi.
 %\textcolor{blue!65!black}{\Huge The \textsf{bidi} \textit{Package}}
 %
 %\Large
-%Source documentation for \textcolor{blue!65!black}{version 33.8}}
+%Source documentation for \textcolor{blue!65!black}{version 33.9}}
 %
 %\vskip 0pt plus 3fill
 %\textit{\large to my Master, \textbf{Ferdowsi The Great}}
@@ -340,7 +340,7 @@ by Vafa Khalighi.
 %\iffalse
 %<*table>
 %\fi
-%% \CheckSum{50128}
+%% \CheckSum{50190}
 %% \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
@@ -1953,8 +1953,8 @@ by Vafa Khalighi.
 % \section{File \texttt{bidi.sty}}
 %    \begin{macrocode}
 \NeedsTeXFormat{LaTeX2e}
-\def\bididate{2018/09/26}
-\def\bidi@version{33.8}
+\def\bididate{2018/09/27}
+\def\bidi@version{33.9}
 \ProvidesPackage{bidi}[\bididate\space v\bidi@version\space
 Bidirectional typesetting in plain TeX and LaTeX]
 \edef\@bidi@info{****************************************************^^J%
@@ -2038,7 +2038,7 @@ Bidirectional typesetting in plain TeX and LaTeX]
 }
 \newcommand*{\@bidi@pdfcustomproperties}{%
   This is the bidi package, Version \bidi@version,
-  Released September 26, 2018. 
+  Released September 27, 2018. 
 }
 \@RTLmainfalse
 \AtBeginDocument{%
@@ -2244,9 +2244,9 @@ Bidirectional typesetting in plain TeX and LaTeX]
 %\fi
 % \section{File \texttt{bidi.tex}}
 %    \begin{macrocode}
-\def\bididate{2018/09/26}
+\def\bididate{2018/09/27}
 \catcode`@=11
-\def\bidi@version{33.8}
+\def\bidi@version{33.9}
 \let \protect \relax
 \newlinechar`\^^J
 \edef\@bidi@info{****************************************************^^J%
@@ -2345,7 +2345,7 @@ Bidirectional typesetting in plain TeX and LaTeX]
 }
 \def\@bidi@pdfcustomproperties{%
   This is the bidi package, Version \bidi@version,
-  Released September 26, 2018. 
+  Released September 27, 2018. 
 }
 \def\bidi@pdfm@mark{%
   \special{pdf:%
@@ -9414,7 +9414,7 @@ bidi implementation of tufte title]
 %\fi
 % \section{File \texttt{extrafootnotefeatures-xetex-bidi.def}}
 %    \begin{macrocode}
-\ProvidesFile{extrafootnotefeatures-xetex-bidi.def}[2018/09/26 v1.3 bidi extra footnote features for XeTeX engine]
+\ProvidesFile{extrafootnotefeatures-xetex-bidi.def}[2018/09/27 v1.4 bidi extra footnote features for XeTeX engine]
 \newcommand*{\@bidi@before@Hy@hyperfootnotes}{%
 \if@bidi@csundef{ifHy@hyperfootnotes}{}{%
 \if@bidi@csundef{HLTR@@LTRfootnotetext}{}{%
@@ -9574,8 +9574,6 @@ bidi implementation of tufte title]
   \kern-\multiplefootnotemarker
   \kern\multiplefootnotemarker\relax}
 \bidi@ensure@newlength{\footmarkwidth}
-\bidi@ensure@newlength{\footmarksep}
-\bidi@ensure@newlength{\footparindent}
 \bidi@ensure@newcommand*{\footmarkstyle}[1]{\def\footscript##1{#1}}
 \bidi@ensure@newcommand*{\LTRfootmarkstyle}[1]{\def\LTRfootscript##1{#1}}
 \bidi@ensure@newcommand*{\RTLfootmarkstyle}[1]{\def\RTLfootscript##1{#1}}
@@ -9618,8 +9616,12 @@ bidi implementation of tufte title]
 \footmarkstyle{\textsuperscript{#1}}
 \LTRfootmarkstyle{\textsuperscript{#1}}
 \RTLfootmarkstyle{\textsuperscript{#1}}
-\setlength{\footmarkwidth}{1em plus.4em minus.4em}
-\setlength{\footparindent}{1em}
+\newcommand*{\bidi@normal@footmarkwidth}{%
+  \setlength{\footmarkwidth}{1em plus.4em minus.4em}%
+}
+\newcommand*{\bidi@star@footmarkwidth}{%
+  \setlength{\footmarkwidth}{0em plus.4em minus.4em}%
+}
 \bidi@ensure@newcommand{\m@mdoextrafeet}{\extrafeetins}
 \bidi@ensure@newcommand*{\extrafeetins}{%
   \setbox\@outputbox \vbox{%
@@ -9674,9 +9676,10 @@ bidi implementation of tufte title]
 \bidi@ensure@newcommand{\m@make@footstart}[1]{%
   \@namedef{@footstart#1}{%
    \bidi@mopfn@bottom
-    \vskip\bigskipamount
     \leftskip=\z@
     \rightskip=\z@
+    \parindent=\z@
+    \vskip\skip\footins
     \footnoterule}}
 \newinsert\footinsv@r
 \skip\footinsv@r\bigskipamount
@@ -9717,7 +9720,9 @@ bidi implementation of tufte title]
   \let\@mpRTLfootnotetext\@mptwocolRTLfootnotetext
   \@bidi@after@Hy@hyperfootnotes
   \m@make@mptwocol@footgroup{v@r}%
-  \let\mp@footgroupv@r\@mptwocol@footgroupv@r}
+  \let\mp@footgroupv@r\@mptwocol@footgroupv@r
+  \@ifstar\bidi@star@footmarkwidth\bidi@normal@footmarkwidth
+}
 \bidi@ensure@newcommand{\@twocolfootnotetext}[1]{\insert\footinsv@r{\if@RTL@footnote\@RTLtrue\else\@RTLfalse\fi%
   \def\baselinestretch{\m@m@footnote@spacing}%
   \reset@font\foottextfont
@@ -9813,7 +9818,9 @@ bidi implementation of tufte title]
   \@namedef{@footgroup#1}{\@nameuse{@twocol@footgroup#1}}%
   \@namedef{mp@footgroup#1}{\@nameuse{@mptwocol@footgroup#1}}%
   \expandafter\dimen\csname footins#1\endcsname=2\footinsdim
-  \expandafter\count\csname footins#1\endcsname=500\relax}
+  \expandafter\count\csname footins#1\endcsname=500\relax
+  \@ifstar\bidi@star@footmarkwidth\bidi@normal@footmarkwidth
+}
 \bidi@ensure@newcommand{\m@make@twocolfootnotetext}[1]{%
   \bidi@namelongdef{@twocolfootnotetext#1}##1{%
     \insert\@nameuse{footins#1}{%
@@ -9868,7 +9875,9 @@ bidi implementation of tufte title]
   \let\@mpRTLfootnotetext\@mpthreecolRTLfootnotetext
   \@bidi@after@Hy@hyperfootnotes
   \m@make@mpthreecol@footgroup{v@r}%
-  \let\mp@footgroupv@r\@mpthreecol@footgroupv@r}
+  \let\mp@footgroupv@r\@mpthreecol@footgroupv@r
+  \@ifstar\bidi@star@footmarkwidth\bidi@normal@footmarkwidth
+}
 \bidi@ensure@newcommand{\@threecolfootnotetext}[1]{\insert\footinsv@r{\if@RTL@footnote\@RTLtrue\else\@RTLfalse\fi%
   \def\baselinestretch{\m@m@footnote@spacing}%
   \reset@font\foottextfont
@@ -9958,7 +9967,9 @@ bidi implementation of tufte title]
   \@namedef{@footgroup#1}{\@nameuse{@threecol@footgroup#1}}%
   \@namedef{mp@footgroup#1}{\@nameuse{@mpthreecol@footgroup#1}}%
   \expandafter\dimen\csname footins#1\endcsname=3\footinsdim
-  \expandafter\count\csname footins#1\endcsname=333\relax}
+  \expandafter\count\csname footins#1\endcsname=333\relax
+  \@ifstar\bidi@star@footmarkwidth\bidi@normal@footmarkwidth
+}
 \bidi@ensure@newcommand{\m@make@threecolfootnotetext}[1]{%
 \bidi@namelongdef{@threecolfootnotetext#1}##1{%
   \insert\@nameuse{footins#1}{%
@@ -10012,7 +10023,9 @@ bidi implementation of tufte title]
   \let\@mpRTLfootnotetext\@mpfourcolRTLfootnotetext
   \@bidi@after@Hy@hyperfootnotes
   \m@make@mpfourcol@footgroup{v@r}%
-  \let\mp@footgroupv@r\@mpfourcol@footgroupv@r}
+  \let\mp@footgroupv@r\@mpfourcol@footgroupv@r
+  \@ifstar\bidi@star@footmarkwidth\bidi@normal@footmarkwidth
+}
 \bidi@ensure@newcommand{\@fourcolfootnotetext}[1]{\insert\footinsv@r{\if@RTL@footnote\@RTLtrue\else\@RTLfalse\fi%
   \def\baselinestretch{\m@m@footnote@spacing}%
   \reset@font\foottextfont
@@ -10108,7 +10121,9 @@ bidi implementation of tufte title]
   \@namedef{@footgroup#1}{\@nameuse{@fourcol@footgroup#1}}%
   \@namedef{mp@footgroup#1}{\@nameuse{@mpfourcol@footgroup#1}}%
   \expandafter\dimen\csname footins#1\endcsname=2\footinsdim
-  \expandafter\count\csname footins#1\endcsname=500\relax}
+  \expandafter\count\csname footins#1\endcsname=500\relax
+  \@ifstar\bidi@star@footmarkwidth\bidi@normal@footmarkwidth
+}
 \bidi@ensure@newcommand{\m@make@fourcolfootnotetext}[1]{%
   \bidi@namelongdef{@fourcolfootnotetext#1}##1{%
     \insert\@nameuse{footins#1}{%
@@ -10163,7 +10178,9 @@ bidi implementation of tufte title]
   \let\@mpRTLfootnotetext\@mpfivecolRTLfootnotetext
   \@bidi@after@Hy@hyperfootnotes
   \m@make@mpfivecol@footgroup{v@r}%
-  \let\mp@footgroupv@r\@mpfivecol@footgroupv@r}
+  \let\mp@footgroupv@r\@mpfivecol@footgroupv@r
+  \@ifstar\bidi@star@footmarkwidth\bidi@normal@footmarkwidth
+}
 \bidi@ensure@newcommand{\@fivecolfootnotetext}[1]{\insert\footinsv@r{\if@RTL@footnote\@RTLtrue\else\@RTLfalse\fi%
   \def\baselinestretch{\m@m@footnote@spacing}%
   \reset@font\foottextfont
@@ -10259,7 +10276,9 @@ bidi implementation of tufte title]
   \@namedef{@footgroup#1}{\@nameuse{@fivecol@footgroup#1}}%
   \@namedef{mp@footgroup#1}{\@nameuse{@mpfivecol@footgroup#1}}%
   \expandafter\dimen\csname footins#1\endcsname=2\footinsdim
-  \expandafter\count\csname footins#1\endcsname=500\relax}
+  \expandafter\count\csname footins#1\endcsname=500\relax
+  \@ifstar\bidi@star@footmarkwidth\bidi@normal@footmarkwidth
+}
 \bidi@ensure@newcommand{\m@make@fivecolfootnotetext}[1]{%
   \bidi@namelongdef{@fivecolfootnotetext#1}##1{%
     \insert\@nameuse{footins#1}{%
@@ -10314,7 +10333,9 @@ bidi implementation of tufte title]
   \let\@mpRTLfootnotetext\@mpsixcolRTLfootnotetext
   \@bidi@after@Hy@hyperfootnotes
   \m@make@mpsixcol@footgroup{v@r}%
-  \let\mp@footgroupv@r\@mpsixcol@footgroupv@r}
+  \let\mp@footgroupv@r\@mpsixcol@footgroupv@r
+  \@ifstar\bidi@star@footmarkwidth\bidi@normal@footmarkwidth
+}
 \bidi@ensure@newcommand{\@sixcolfootnotetext}[1]{\insert\footinsv@r{\if@RTL@footnote\@RTLtrue\else\@RTLfalse\fi%
   \def\baselinestretch{\m@m@footnote@spacing}%
   \reset@font\foottextfont
@@ -10410,7 +10431,9 @@ bidi implementation of tufte title]
   \@namedef{@footgroup#1}{\@nameuse{@sixcol@footgroup#1}}%
   \@namedef{mp@footgroup#1}{\@nameuse{@mpsixcol@footgroup#1}}%
   \expandafter\dimen\csname footins#1\endcsname=2\footinsdim
-  \expandafter\count\csname footins#1\endcsname=500\relax}
+  \expandafter\count\csname footins#1\endcsname=500\relax
+  \@ifstar\bidi@star@footmarkwidth\bidi@normal@footmarkwidth
+}
 \bidi@ensure@newcommand{\m@make@sixcolfootnotetext}[1]{%
   \bidi@namelongdef{@sixcolfootnotetext#1}##1{%
     \insert\@nameuse{footins#1}{%
@@ -10465,7 +10488,9 @@ bidi implementation of tufte title]
   \let\@mpRTLfootnotetext\@mpsevencolRTLfootnotetext
   \@bidi@after@Hy@hyperfootnotes
   \m@make@mpsevencol@footgroup{v@r}%
-  \let\mp@footgroupv@r\@mpsevencol@footgroupv@r}
+  \let\mp@footgroupv@r\@mpsevencol@footgroupv@r
+  \@ifstar\bidi@star@footmarkwidth\bidi@normal@footmarkwidth
+}
 \bidi@ensure@newcommand{\@sevencolfootnotetext}[1]{\insert\footinsv@r{\if@RTL@footnote\@RTLtrue\else\@RTLfalse\fi%
   \def\baselinestretch{\m@m@footnote@spacing}%
   \reset@font\foottextfont
@@ -10561,7 +10586,9 @@ bidi implementation of tufte title]
   \@namedef{@footgroup#1}{\@nameuse{@sevencol@footgroup#1}}%
   \@namedef{mp@footgroup#1}{\@nameuse{@mpsevencol@footgroup#1}}%
   \expandafter\dimen\csname footins#1\endcsname=2\footinsdim
-  \expandafter\count\csname footins#1\endcsname=500\relax}
+  \expandafter\count\csname footins#1\endcsname=500\relax
+  \@ifstar\bidi@star@footmarkwidth\bidi@normal@footmarkwidth
+}
 \bidi@ensure@newcommand{\m@make@sevencolfootnotetext}[1]{%
   \bidi@namelongdef{@sevencolfootnotetext#1}##1{%
     \insert\@nameuse{footins#1}{%
@@ -10616,7 +10643,9 @@ bidi implementation of tufte title]
   \let\@mpRTLfootnotetext\@mpeightcolRTLfootnotetext
   \@bidi@after@Hy@hyperfootnotes
   \m@make@mpeightcol@footgroup{v@r}%
-  \let\mp@footgroupv@r\@mpeightcol@footgroupv@r}
+  \let\mp@footgroupv@r\@mpeightcol@footgroupv@r
+  \@ifstar\bidi@star@footmarkwidth\bidi@normal@footmarkwidth
+}
 \bidi@ensure@newcommand{\@eightcolfootnotetext}[1]{\insert\footinsv@r{\if@RTL@footnote\@RTLtrue\else\@RTLfalse\fi%
   \def\baselinestretch{\m@m@footnote@spacing}%
   \reset@font\foottextfont
@@ -10712,7 +10741,9 @@ bidi implementation of tufte title]
   \@namedef{@footgroup#1}{\@nameuse{@eightcol@footgroup#1}}%
   \@namedef{mp@footgroup#1}{\@nameuse{@mpeightcol@footgroup#1}}%
   \expandafter\dimen\csname footins#1\endcsname=2\footinsdim
-  \expandafter\count\csname footins#1\endcsname=500\relax}
+  \expandafter\count\csname footins#1\endcsname=500\relax
+  \@ifstar\bidi@star@footmarkwidth\bidi@normal@footmarkwidth
+}
 \bidi@ensure@newcommand{\m@make@eightcolfootnotetext}[1]{%
   \bidi@namelongdef{@eightcolfootnotetext#1}##1{%
     \insert\@nameuse{footins#1}{%
@@ -10767,7 +10798,9 @@ bidi implementation of tufte title]
   \let\@mpRTLfootnotetext\@mpninecolRTLfootnotetext
   \@bidi@after@Hy@hyperfootnotes
   \m@make@mpninecol@footgroup{v@r}%
-  \let\mp@footgroupv@r\@mpninecol@footgroupv@r}
+  \let\mp@footgroupv@r\@mpninecol@footgroupv@r
+  \@ifstar\bidi@star@footmarkwidth\bidi@normal@footmarkwidth
+}
 \bidi@ensure@newcommand{\@ninecolfootnotetext}[1]{\insert\footinsv@r{\if@RTL@footnote\@RTLtrue\else\@RTLfalse\fi%
   \def\baselinestretch{\m@m@footnote@spacing}%
   \reset@font\foottextfont
@@ -10863,7 +10896,9 @@ bidi implementation of tufte title]
   \@namedef{@footgroup#1}{\@nameuse{@ninecol@footgroup#1}}%
   \@namedef{mp@footgroup#1}{\@nameuse{@mpninecol@footgroup#1}}%
   \expandafter\dimen\csname footins#1\endcsname=2\footinsdim
-  \expandafter\count\csname footins#1\endcsname=500\relax}
+  \expandafter\count\csname footins#1\endcsname=500\relax
+  \@ifstar\bidi@star@footmarkwidth\bidi@normal@footmarkwidth
+}
 \bidi@ensure@newcommand{\m@make@ninecolfootnotetext}[1]{%
   \bidi@namelongdef{@ninecolfootnotetext#1}##1{%
     \insert\@nameuse{footins#1}{%
@@ -10918,7 +10953,9 @@ bidi implementation of tufte title]
   \let\@mpRTLfootnotetext\@mptencolRTLfootnotetext
   \@bidi@after@Hy@hyperfootnotes
   \m@make@mptencol@footgroup{v@r}%
-  \let\mp@footgroupv@r\@mptencol@footgroupv@r}
+  \let\mp@footgroupv@r\@mptencol@footgroupv@r
+  \@ifstar\bidi@star@footmarkwidth\bidi@normal@footmarkwidth
+}
 \bidi@ensure@newcommand{\@tencolfootnotetext}[1]{\insert\footinsv@r{\if@RTL@footnote\@RTLtrue\else\@RTLfalse\fi%
   \def\baselinestretch{\m@m@footnote@spacing}%
   \reset@font\foottextfont
@@ -11014,7 +11051,9 @@ bidi implementation of tufte title]
   \@namedef{@footgroup#1}{\@nameuse{@tencol@footgroup#1}}%
   \@namedef{mp@footgroup#1}{\@nameuse{@mptencol@footgroup#1}}%
   \expandafter\dimen\csname footins#1\endcsname=2\footinsdim
-  \expandafter\count\csname footins#1\endcsname=500\relax}
+  \expandafter\count\csname footins#1\endcsname=500\relax
+  \@ifstar\bidi@star@footmarkwidth\bidi@normal@footmarkwidth
+}
 \bidi@ensure@newcommand{\m@make@tencolfootnotetext}[1]{%
   \bidi@namelongdef{@tencolfootnotetext#1}##1{%
     \insert\@nameuse{footins#1}{%
@@ -11144,7 +11183,8 @@ bidi implementation of tufte title]
    \divide \@tempdima \@tempdimb
    \xdef\footfudgefactor{\strip@pt\@tempdima}%
    \endgroup
-  }
+   \@ifstar\bidi@star@footmarkwidth\bidi@normal@footmarkwidth
+}
 \let\bidi@xparaskip\relax
 \@onlypreamble\AddExtraParaSkip
 \bidi@ensure@newcommand{\@parafootnotetext}[1]{\insert\footinsv@r{%
@@ -11273,7 +11313,8 @@ bidi implementation of tufte title]
    \divide \@tempdima \@tempdimb
    \xdef\footfudgefactor{\strip@pt\@tempdima}%
    \endgroup
-  }
+   \@ifstar\bidi@star@footmarkwidth\bidi@normal@footmarkwidth
+}
 \bidi@ensure@newcommand{\m@make@parafootnotetext}[1]{%
 \bidi@namelongdef{@parafootnotetext#1}##1{%
   \insert\@nameuse{footins#1}{
@@ -11326,7 +11367,7 @@ bidi implementation of tufte title]
   \noindent\unhbox0\par}}
 \bidi@ensure@newcommand{\m@make@para@footstart}[1]{%
 \@namedef{@para@footstart#1}{%
-  \vskip\bigskipamount
+  \bidi@mopfn@bottom
   \leftskip=\z@
   \rightskip=\z@
   \parindent=\z@