beamer-rl (21aug20)

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

7 files changed, 293 insertions, 253 deletions

diff --git a/Master/texmf-dist/doc/lualatex/beamer-rl/Example-of-use-ar.pdf b/Master/texmf-dist/doc/lualatex/beamer-rl/Example-of-use-ar.pdf
index 8c73409ff3e..b64a2f91f22 100644
--- a/Master/texmf-dist/doc/lualatex/beamer-rl/Example-of-use-ar.pdf
+++ b/Master/texmf-dist/doc/lualatex/beamer-rl/Example-of-use-ar.pdf
diff --git a/Master/texmf-dist/doc/lualatex/beamer-rl/Example-of-use-ar.tex b/Master/texmf-dist/doc/lualatex/beamer-rl/Example-of-use-ar.tex
index 0a68f44768c..beb958a7b79 100644
--- a/Master/texmf-dist/doc/lualatex/beamer-rl/Example-of-use-ar.tex
+++ b/Master/texmf-dist/doc/lualatex/beamer-rl/Example-of-use-ar.tex
@@ -113,6 +113,85 @@
 
 \end{frame}
 
+\section{بعض الملاحظات}
+
+\begin{frame}[fragile,allowframebreaks]
+\frametitle{بعض الملاحظات}
+
+\begin{itemize}
+\item
+يمكن اضافة كل الخيارات التي تتيحها الفئة \verb:beamer: عند استدعاء الفئة \verb:beamer-rl:
+
+كما يمكن تمرير خيارات اضافية للحزمة 
+ \verb:babel: 
+ عند استدعاء الفئة \verb:beamer-rl: على الشكل:
+
+\medskip 
+ 
+{\selectlanguage{nil}
+\verb:\documentclass[babel={<babel options>}]{beamer-rl}:
+}
+
+\medskip
+
+\item
+الفئة 
+ \verb:beamer-rl: تقوم بتبادل لكل من التعليمتين  \cs{blacktriangleright} و   \cs{blacktriangleleft} في حالة نص من اليمين لليسار
+
+\bigskip
+
+{%
+\renewcommand{\arraystretch}{1.3}
+\centering
+\begin{tabular}{ccc}
+\hline
+ &  \verb:\blacktriangleright: & \verb:\blacktriangleleft:   \\
+\hline 
+LTR context & \blacktriangleright & \blacktriangleleft \\
+\hline
+RTL context & \selectlanguage{nil}\blacktriangleright & \selectlanguage{nil}\blacktriangleleft \\
+\hline
+\end{tabular}
+\par
+}
+
+\bigskip
+ 
+\item
+
+الخيار 
+\verb:arabic:
+للفئة يمكن من استدعاء قاموس عربي لترجمة بعض المفردات مثل 
+\verb:example: ،\verb:definition: ،\verb:theorem: ....  
+
+
+\medskip 
+ 
+{\selectlanguage{nil}
+\verb:\documentclass[arabic]{beamer-rl}:
+}
+
+\medskip
+ 
+\item
+في بعض الحالات يمكن استعمال التعليمة 
+ \cs{babelsublr} التي توفرها الحزمة  \verb:bebel: 
+لادراج نص من اليسار لليمين (لاتيني) في وسط نص من اليمين لليسار،
+ على سبيل المثال  في حال الحاجة إلى ادراج رسم  
+ \verb:pspicture: ضمن نص من اليمين لليسار. 
+
+\medskip 
+ 
+{\selectlanguage{nil}
+\verb:\bebelsublr{LTR context ... }:
+}
+
+\end{itemize}
+
+
+\end{frame}
+
+
 \section{أمثلة}
 \subsection{الإطارات}
 
@@ -221,94 +300,18 @@ number not in the first $p$ numbers.\qedhere
 \begin{frame}[fragile]
 \frametitle{التكبير}
 
-\framezoom<1><2>[border=2](2cm,2cm)(2cm,2cm)
+\framezoom<1><2>[border=2](3cm,2cm)(2cm,2cm)
 \pgfimage[height=5cm]{example-image}
 
 \selectlanguage{nil}
 
 \begin{verbatim}
-\framezoom<1><2>[border=2](2cm,2cm)(2cm,2cm)
+\framezoom<1><2>[border=2](3cm,2cm)(2cm,2cm)
+% (3cm,2cm)=(<upper right x>,<upper right y>)
+% (2cm,2cm)=(<zoom area width>,<zoom area depth>)
 \pgfimage[height=5cm]{example-image}
 \end{verbatim}
 \end{frame}
 
-\section{بعض الملاحظات}
-
-\begin{frame}[fragile,allowframebreaks]
-\frametitle{بعض الملاحظات}
-
-\begin{itemize}
-\item
-يمكن اضافة كل الخيارات التي تتيحها الفئة \verb:beamer: عند استدعاء الفئة \verb:beamer-rl:
-
-كما يمكن تمرير خيارات اضافية للحزمة 
- \verb:babel: 
- عند استدعاء الفئة \verb:beamer-rl: على الشكل:
-
-\medskip 
- 
-{\selectlanguage{nil}
-\verb:\documentclass[babel={<babel options>}]{beamer-rl}:
-}
-
-\medskip
-
-\item
-الفئة 
- \verb:beamer-rl: تقوم بتبادل لكل من التعليمتين  \cs{blacktriangleright} و   \cs{blacktriangleleft} في حالة نص من اليمين لليسار
-
-\bigskip
-
-{%
-\renewcommand{\arraystretch}{1.3}
-\centering
-\begin{tabular}{ccc}
-\hline
- &  \verb:\blacktriangleright: & \verb:\blacktriangleleft:   \\
-\hline 
-LTR context & \blacktriangleright & \blacktriangleleft \\
-\hline
-RTL context & \selectlanguage{nil}\blacktriangleright & \selectlanguage{nil}\blacktriangleleft \\
-\hline
-\end{tabular}
-\par
-}
-
-\bigskip
- 
-\item
-
-الخيار 
-\verb:arabic:
-للفئة يمكن من استدعاء قاموس عربي لترجمة بعض المفردات مثل 
-\verb:example: ،\verb:definition: ،\verb:theorem: ....  
-
-
-\medskip 
- 
-{\selectlanguage{nil}
-\verb:\documentclass[arabic]{beamer-rl}:
-}
-
-\medskip
- 
-\item
-في بعض الحالات يمكن استعمال التعليمة 
- \cs{babelsublr} التي توفرها الحزمة  \verb:bebel: 
-لادراج نص من اليسار لليمين (لاتيني) في وسط نص من اليمين لليسار،
- على سبيل المثال  في حال الحاجة إلى ادراج رسم  
- \verb:pspicture: ضمن نص من اليمين لليسار. 
-
-\medskip 
- 
-{\selectlanguage{nil}
-\verb:\bebelsublr{LTR context ... }:
-}
-
-\end{itemize}
-
-
-\end{frame}
-
 \end{document}
 
diff --git a/Master/texmf-dist/doc/lualatex/beamer-rl/Example-of-use-en.pdf b/Master/texmf-dist/doc/lualatex/beamer-rl/Example-of-use-en.pdf
index 68a81c83297..e80315dae6d 100644
--- a/Master/texmf-dist/doc/lualatex/beamer-rl/Example-of-use-en.pdf
+++ b/Master/texmf-dist/doc/lualatex/beamer-rl/Example-of-use-en.pdf
diff --git a/Master/texmf-dist/doc/lualatex/beamer-rl/Example-of-use-en.tex b/Master/texmf-dist/doc/lualatex/beamer-rl/Example-of-use-en.tex
index 662992fd66a..08276708038 100644
--- a/Master/texmf-dist/doc/lualatex/beamer-rl/Example-of-use-en.tex
+++ b/Master/texmf-dist/doc/lualatex/beamer-rl/Example-of-use-en.tex
@@ -106,6 +106,81 @@ for right to left presentation, this package call babel with \verb|bidi=basic-r|
 
 \end{frame}
 
+\section{Some notes}
+
+\begin{frame}[fragile,allowframebreaks]
+\frametitle{Some notes}
+
+\begin{itemize}
+
+\item
+
+All options provided by \verb:beamer:  can be added  with  \verb:beamer-rl:
+
+Additional options can also be passed to  package 
+ \verb:babel: 
+ with  \verb:beamer-rl: like this
+
+\medskip 
+ 
+{\selectlanguage{nil}
+\verb:\documentclass[babel={<babel options>}]{beamer-rl}:
+}
+
+\medskip
+
+\item
+The \verb:beamer-rl: class swap the definition of \verb:\blacktriangleright: with  \verb:\blacktriangleleft: in RTL context
+
+\bigskip
+
+{\renewcommand{\arraystretch}{1.3}
+\centering
+\begin{tabular}{ccc}
+\hline
+ &  \verb:\blacktriangleright: & \verb:\blacktriangleleft:   \\
+\hline 
+LTR context & \blacktriangleright & \blacktriangleleft \\
+\hline
+RTL context & \selectlanguage{nil}\blacktriangleright & \selectlanguage{nil}\blacktriangleleft \\
+\hline
+\end{tabular}
+\par
+}
+
+\bigskip
+
+
+\item
+
+Class option \verb:arabic: call an Arabic dictionary to translate strings like \verb:theorem:, \verb:example:, \verb:definition: ....  
+
+
+\medskip 
+ 
+{\selectlanguage{nil}
+\verb:\documentclass[arabic]{beamer-rl}:
+}
+
+\medskip
+
+
+\item
+In some cases you  need to use \verb:\babelsublr: command from \verb:bebel: 
+package to insert a left to right text within your right to left text, e.g if you need to insert a \verb:pspicture: drawing in RTL context 
+
+\medskip 
+ 
+{\selectlanguage{nil}
+\verb:\bebelsublr{LTR context ... }:
+}
+
+\end{itemize}
+
+
+\end{frame}
+
+
 \section{Examples}
 \subsection{Blocks}
 
@@ -217,89 +292,19 @@ number not in the first $p$ numbers.\qedhere
 \begin{frame}[fragile]
 \frametitle{Zooming}
 
-\framezoom<1><2>[border=2](2cm,2cm)(2cm,2cm)
+\framezoom<1><2>[border=2](3cm,2cm)(2cm,2cm)
 \pgfimage[height=5cm]{example-image}
 
 \selectlanguage{nil}
 
 \begin{verbatim}
-\framezoom<1><2>[border=2](2cm,2cm)(2cm,2cm)
+\framezoom<1><2>[border=2](3cm,2cm)(2cm,2cm)
+% (3cm,2cm)=(<upper right x>,<upper right y>)
+% (2cm,2cm)=(<zoom area width>,<zoom area depth>)
 \pgfimage[height=5cm]{example-image}
 \end{verbatim}
-\end{frame}
-
-\section{Some notes}
-
-\begin{frame}[fragile,allowframebreaks]
-\frametitle{Some notes}
-
-\begin{itemize}
-
-\item
-
-All options provided by \verb:beamer:  can be added  with  \verb:beamer-rl:
-
-Additional options can also be passed to  package 
- \verb:babel: 
- with  \verb:beamer-rl: like this
-
-\medskip 
- 
-{\selectlanguage{nil}
-\verb:\documentclass[babel={<babel options>}]{beamer-rl}:
-}
-
-\medskip
-
-\item
-The \verb:beamer-rl: class swap the definition of \verb:\blacktriangleright: with  \verb:\blacktriangleleft: in RTL context
-
-\bigskip
-
-{\renewcommand{\arraystretch}{1.3}
-\centering
-\begin{tabular}{ccc}
-\hline
- &  \verb:\blacktriangleright: & \verb:\blacktriangleleft:   \\
-\hline 
-LTR context & \blacktriangleright & \blacktriangleleft \\
-\hline
-RTL context & \selectlanguage{nil}\blacktriangleright & \selectlanguage{nil}\blacktriangleleft \\
-\hline
-\end{tabular}
-\par
-}
-
-\bigskip
-
-
-\item
-
-Class option \verb:arabic: call an Arabic dictionary to translate strings like \verb:theorem:, \verb:example:, \verb:definition: ....  
-
-
-\medskip 
- 
-{\selectlanguage{nil}
-\verb:\documentclass[arabic]{beamer-rl}:
-}
-
-\medskip
-
-
-\item
-In some cases you  need to use \verb:\babelsublr: command from \verb:bebel: 
-package to insert a left to right text within your right to left text, e.g if you need to insert a \verb:pspicture: drawing in RTL context 
-
-\medskip 
- 
-{\selectlanguage{nil}
-\verb:\bebelsublr{LTR context ... }:
-}
-
-\end{itemize}
-
 
 \end{frame}
 
+
 \end{document}
diff --git a/Master/texmf-dist/doc/lualatex/beamer-rl/README.txt b/Master/texmf-dist/doc/lualatex/beamer-rl/README.txt
index 2b06f7ab976..e6b53616f93 100644
--- a/Master/texmf-dist/doc/lualatex/beamer-rl/README.txt
+++ b/Master/texmf-dist/doc/lualatex/beamer-rl/README.txt
@@ -1,20 +1,20 @@
 The beamer-rl class
-v1.4
+v1.4a
 
 This class provides patchs of some beamer templates and commands 
-for right to left presentation, this package require babel with lualatex engine  
+for right to left presentation, the class require babel with lualatex engine  
 If you want to report any bugs or typos and corrections in the
 documentation  then
 please use the issue tracker:
 
   <https://github.com/seloumi/beamer-rl/issues>
 
-Current version release date: 2020/08/04
+Current version release date: 2020/08/21
 
 ___________________
 Salim Bou
 
-Copyright (c) 2020
+Copyright (c) 2019-2020
 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
diff --git a/Master/texmf-dist/tex/lualatex/beamer-rl/beamer-rl.cls b/Master/texmf-dist/tex/lualatex/beamer-rl/beamer-rl.cls
index 034c26597ac..7a6bdc1143e 100644
--- a/Master/texmf-dist/tex/lualatex/beamer-rl/beamer-rl.cls
+++ b/Master/texmf-dist/tex/lualatex/beamer-rl/beamer-rl.cls
@@ -1,6 +1,6 @@
 \NeedsTeXFormat{LaTeX2e}
 \ProvidesClass{beamer-rl}
-[2020/08/04 v1.4 LaTeX class to patch beamer for right to left presentation with babel]
+[2020/08/04 v1.4a  LaTeX class to patch beamer for right to left presentation with babel]
 
 \RequirePackage{kvoptions}
 \RequirePackage{kvsetkeys}
@@ -57,10 +57,10 @@
 
 
 \let\oldpgfpicture\pgfpicture
-\let\oldendpgfpicture\endpgfpicture
+\let\endoldpgfpicture\endpgfpicture
 
 \def\pgfpicture{\babelsublr\bgroup\oldpgfpicture}
-\def\endpgfpicture{\oldendpgfpicture\egroup}
+\def\endpgfpicture{\endoldpgfpicture\egroup}
 
 \let\oldpgfuseshading\pgfuseshading
 \def\pgfuseshading#1{\babelsublr{\oldpgfuseshading{#1}}}
@@ -403,97 +403,125 @@
 %
 
 \def\beamer@framezoom<#1><#2>[#3](#4,#5)(#6,#7){%
-	\par\nointerlineskip%
-	\global\beamer@slidehaszoomtrue%
-	\advance\beamer@zoomcount by1\relax%
-	\def\beamer@zoomborderwidth{0}%
-	\edef\beamer@labelzoomed{beamer@labelzoomed@\the\beamer@zoomframecount @\the\beamer@zoomcount}%
-	\setkeys{beamerzoom}{#3}%
-	\only<#1>{%
-		{\hypersetup{pdfhighlight={/P},pdfborder={0 0 \beamer@zoomborderwidth}}%
-			\global\setbox\@tempboxa=\vbox{\hyperlink{\beamer@labelzoomed}{\vbox to #7{\hbox
-						to#6{\hfil}\vfil}}}}%
-		\ht\@tempboxa=0pt%
-		\wd\@tempboxa=0pt%
-		\dp\@tempboxa=0pt%
-		\setbox\@tempboxa=\vbox{\moveright#4\hbox{\lower#5\vbox{\box\@tempboxa}}}%
-		\ht\@tempboxa=0pt%
-		\wd\@tempboxa=0pt%
-		\dp\@tempboxa=0pt%
-		\global\setbox\beamer@zoombox=\vbox to0pt{\unvbox\beamer@zoombox\box\@tempboxa}%
-	}%
-	\only<#2>{%
-		\pardir TLT% 
-		\@ifundefined{\beamer@labelzoomed}%
-		{%
-			\hypertarget{\beamer@labelzoomed}{}%
-			\expandafter\gdef\csname\beamer@labelzoomed\endcsname{}%
-		}{}%
-		\gdef\beamer@zoomer{%
-			% compute zoom factor
-			\@tempdima=\beamer@frametextheight%
-			\@tempdimb=#7\relax%
-			\@tempcnta=\@tempdimb%
-			\divide\@tempcnta by4096\relax%
-			\multiply\@tempdima by16\relax%
-			\divide\@tempdima by\@tempcnta%
-			\@tempdimb=\paperwidth%
-			\ifbeamer@plainframe%
-			\else%
-			\advance\@tempdimb by-\beamer@leftsidebar%
-			\advance\@tempdimb by-\beamer@rightsidebar\relax%
-			\fi%
-			\@tempdimc=#6\relax%
-			\@tempcntb=\@tempdimc%
-			\divide\@tempcntb by4096\relax%
-			\multiply\@tempdimb by16\relax%
-			\divide\@tempdimb by\@tempcntb%
-			\ifdim\@tempdimb<\@tempdima%
-			\@tempdima=\@tempdimb%
-			\fi%
-			\edef\beamer@temp{\strip@pt\@tempdima}%
-			\@tempdimc=\beamer@frametextheight%
-			\advance\@tempdimc by4pt%
-			\@tempdimb=\paperwidth%
-			\ifbeamer@plainframe%
-			\else%
-			\advance\@tempdimb by-\beamer@leftsidebar%
-			\advance\@tempdimb by-\beamer@rightsidebar\relax%
-			\fi%
-			\setbox\@tempboxa=\vbox{\hsize=\@tempdimb\Acrobatmenu{GoBack}{\vbox to
-					\beamer@frametextheight{\hbox to\@tempdimb{\hfil}\vfil}}}%
-			\ht\@tempboxa=0pt%
-			\wd\@tempboxa=0pt%
-			\dp\@tempboxa=0pt%
-			\setbox\beamer@framebox=\vbox to\beamer@frametextheight{{%
-					\ifbeamer@plainframe\beamer@leftmargin=\Gm@lmargin\fi%
-					\pardir TLT% 
-					\begin{pgfpicture}{\beamer@leftmargin}{-\beamer@frametextheight}{\beamer@leftmargin}{0pt}
-						\pgftext[left,top]{\box\@tempboxa}
-						\pgfpathrectangle{\pgfpoint{0pt}{-\@tempdimc}}{\pgfpoint{\@tempdimb}{\@tempdimc}}%
-						\pgfusepath{clip}
-						\begingroup
-						\pgftransformscale{\beamer@temp}
-						\@tempdima=#4\relax%
-						\@tempdimb=#5\relax%
-						{\pgftransformshift{\pgfpoint{-\@tempdima}{\@tempdimb}}%
-							\pgftext[left,top]{\vbox{\vbox{}\nointerlineskip\unvbox\beamer@framebox}}}
-						\endgroup
-					\end{pgfpicture}%
-			}}%
-			
-			\setbox\beamer@framebox=\vbox{%
-				\nobreak\vbox{}\nobreak\par\nobreak\beamer@entrycode\nobreak%
-				\nointerlineskip\unvbox\beamer@frametitlebox%
-				\nobreak%
-				\box\beamer@framebox %
-				\nobreak%
-				\vss%
-				\beamer@exitcode%
-			}%
-			\global\setbox\beamer@footins=\box\voidb@x% no footnotes in zoomed slides
-		}%
-	}%
+  \par\nointerlineskip%
+  \global\beamer@slidehaszoomtrue%
+  \advance\beamer@zoomcount by1\relax%
+  \def\beamer@zoomborderwidth{0}%
+  \edef\beamer@labelzoomed{beamer@labelzoomed@\the\beamer@zoomframecount @\the\beamer@zoomcount}%
+  \setkeys{beamerzoom}{#3}%
+  \only<#1>{%
+    {\hypersetup{pdfhighlight={/P},pdfborder={0 0 \beamer@zoomborderwidth}}%
+    \global\setbox\@tempboxa=\vbox{\hyperlink{\beamer@labelzoomed}{\vbox to #7{\hbox
+          to#6{\hfil}\vfil}}}}%
+    \ht\@tempboxa=0pt%
+    \wd\@tempboxa=0pt%
+    \dp\@tempboxa=0pt%
+    \setbox\@tempboxa=\vbox{\moveright#4\hbox{\lower#5\vbox{\box\@tempboxa}}}%
+    \ht\@tempboxa=0pt%
+    \wd\@tempboxa=0pt%
+    \dp\@tempboxa=0pt%
+    \global\setbox\beamer@zoombox=\vbox to0pt{\unvbox\beamer@zoombox\box\@tempboxa}%
+  }%
+  \only<#2>{%
+    \@ifundefined{\beamer@labelzoomed}%
+    {%
+      \hypertarget{\beamer@labelzoomed}{}%
+      \expandafter\gdef\csname\beamer@labelzoomed\endcsname{}%
+    }{}%
+    \gdef\beamer@zoomer{%
+      % compute zoom factor
+      \@tempdima=\beamer@frametextheight%
+      \@tempdimb=#7\relax%
+      \@tempcnta=\@tempdimb%
+      \divide\@tempcnta by4096\relax%
+      \multiply\@tempdima by16\relax%
+      \divide\@tempdima by\@tempcnta%
+      \@tempdimb=\paperwidth%
+      \ifbeamer@plainframe%
+      \else%
+        \advance\@tempdimb by-\beamer@leftsidebar%
+        \advance\@tempdimb by-\beamer@rightsidebar\relax%
+      \fi%
+      \@tempdimc=#6\relax%
+      \@tempcntb=\@tempdimc%
+      \divide\@tempcntb by4096\relax%
+      \multiply\@tempdimb by16\relax%
+      \divide\@tempdimb by\@tempcntb%
+      \ifdim\@tempdimb<\@tempdima%
+        \@tempdima=\@tempdimb%
+      \fi%
+      \edef\beamer@temp{\strip@pt\@tempdima}%
+      \@tempdimc=\beamer@frametextheight%
+      \advance\@tempdimc by4pt%
+      \@tempdimb=\paperwidth%
+      \ifbeamer@plainframe%
+      \else%
+        \advance\@tempdimb by-\beamer@leftsidebar%
+        \advance\@tempdimb by-\beamer@rightsidebar\relax%
+      \fi%
+      \setbox\@tempboxa=\vbox{\hsize=\@tempdimb\Acrobatmenu{GoBack}{\vbox to
+          \beamer@frametextheight{\hbox to\@tempdimb{\hfil}\vfil}}}%
+      \ht\@tempboxa=0pt%
+      \wd\@tempboxa=0pt%
+      \dp\@tempboxa=0pt%
+      \setbox\beamer@framebox=\vbox to\beamer@frametextheight{{%
+          \ifbeamer@plainframe\beamer@leftmargin=\Gm@lmargin\fi%
+          \begin{oldpgfpicture}{\beamer@leftmargin}{-\beamer@frametextheight}{\beamer@leftmargin}{0pt}
+            \pgftext[left,top]{\box\@tempboxa}
+            \pgfpathrectangle{\pgfpoint{0pt}{-\@tempdimc}}{\pgfpoint{\ifcase\bbl@thepardir \else-\fi\@tempdimb}{\@tempdimc}}%
+            \pgfusepath{clip}
+            \begingroup
+              \pgftransformscale{\beamer@temp}
+              \@tempdima=#4\relax%
+              \@tempdimb=#5\relax%
+              {\pgftransformshift{\pgfpoint{-\@tempdima}{\@tempdimb}}%
+              \pgftext[left,top]{\vbox{\vbox{}\nointerlineskip\unvbox\beamer@framebox}}}
+            \endgroup
+          \end{oldpgfpicture}%
+        }}%
+      \setbox\beamer@framebox=\vbox{%
+        \nobreak\vbox{}\nobreak\par\nobreak\beamer@entrycode\nobreak%
+        \nointerlineskip\unvbox\beamer@frametitlebox%
+        \nobreak%
+        \box\beamer@framebox%
+        \nobreak%
+        \vss%
+        \beamer@exitcode%
+      }%
+      \global\setbox\beamer@footins=\box\voidb@x% no footnotes in zoomed slides
+    }%
+  }%
+}
+
+
+%
+% Shrink stuff
+%
+
+\def\beamer@shrinkframebox{%
+  \@tempdima=\ht\beamer@framebox%
+%  \ifdim\@tempdima>\beamer@frametextheight%
+    \@tempcnta=\@tempdima%
+    \divide\@tempcnta by 65536\relax%
+    \@tempdimc=\beamer@frametextheight%
+    \divide\@tempdimc by\@tempcnta\relax%
+    \ifdim\@tempdimc>\beamer@shrinkfactor pt%
+      \@tempdimc=\beamer@shrinkfactor pt%
+    \else%
+      \@tempdima=-100\@tempdimc%
+      \advance\@tempdima by100pt%
+      \ClassWarning{beamer}{Frame text is shrunk by a factor of %
+      \strip@pt\@tempdima\space percent instead of
+      \beamer@shrinkpercentage\space percent}%
+    \fi%
+    \edef\beamer@factortemp{\strip@pt\@tempdimc}%
+    \setbox\beamer@framebox=\vbox to\beamer@frametextheight{%
+      \begin{oldpgfpicture}{0pt}{-\beamer@frametextheight}{0pt}{0pt}
+        {\pgftransformscale{\beamer@factortemp}%
+          \pgftext[left,top]{\box\beamer@framebox}}%
+      \end{oldpgfpicture}%
+    }%
+%  \fi%
 }
 
 \endinput
diff --git a/Master/texmf-dist/tex/lualatex/beamer-rl/translator-basic-dictionary-Arabic.dict b/Master/texmf-dist/tex/lualatex/beamer-rl/translator-basic-dictionary-Arabic.dict
index 6f44d3c37eb..c02c35aebd1 100644
--- a/Master/texmf-dist/tex/lualatex/beamer-rl/translator-basic-dictionary-Arabic.dict
+++ b/Master/texmf-dist/tex/lualatex/beamer-rl/translator-basic-dictionary-Arabic.dict
@@ -32,6 +32,7 @@
 \providetranslation{figure}{شكل}
 \providetranslation{From}{من}
 \providetranslation{from}{من}
+\providetranslation{From?}{من أين؟}
 \providetranslation{Glossary}{قاموس}
 \providetranslation{Index}{فهرس}
 \providetranslation{Introduction}{مدخل}
@@ -85,3 +86,6 @@
 \providetranslation{table}{جدول}
 \providetranslation{To}{إلى}
 \providetranslation{to}{إلى}
+\providetranslation{When?}{متى?}
+\providetranslation{Who?}{من?}
+