texlive[58518] branches/branch2020.0/Master/texmf-dist: beamer-rl

commits+karl at tug.org commits+karl at tug.org
Thu Mar 18 22:12:21 CET 2021


Revision: 58518
          http://tug.org/svn/texlive?view=revision&revision=58518
Author:   karl
Date:     2021-03-18 22:12:20 +0100 (Thu, 18 Mar 2021)
Log Message:
-----------
beamer-rl (18mar21) (branch)

Modified Paths:
--------------
    branches/branch2020.0/Master/texmf-dist/doc/lualatex/beamer-rl/Example-of-use-ar.pdf
    branches/branch2020.0/Master/texmf-dist/doc/lualatex/beamer-rl/Example-of-use-ar.tex
    branches/branch2020.0/Master/texmf-dist/doc/lualatex/beamer-rl/Example-of-use-en.pdf
    branches/branch2020.0/Master/texmf-dist/doc/lualatex/beamer-rl/Example-of-use-en.tex
    branches/branch2020.0/Master/texmf-dist/doc/lualatex/beamer-rl/README.txt
    branches/branch2020.0/Master/texmf-dist/tex/lualatex/beamer-rl/beamer-rl.cls

Modified: branches/branch2020.0/Master/texmf-dist/doc/lualatex/beamer-rl/Example-of-use-ar.pdf
===================================================================
(Binary files differ)

Modified: branches/branch2020.0/Master/texmf-dist/doc/lualatex/beamer-rl/Example-of-use-ar.tex
===================================================================
--- branches/branch2020.0/Master/texmf-dist/doc/lualatex/beamer-rl/Example-of-use-ar.tex	2021-03-18 21:12:06 UTC (rev 58517)
+++ branches/branch2020.0/Master/texmf-dist/doc/lualatex/beamer-rl/Example-of-use-ar.tex	2021-03-18 21:12:20 UTC (rev 58518)
@@ -1,8 +1,11 @@
-\documentclass[arabic,babel={layout=lists}]{beamer-rl}
+\documentclass[arabic,babel={layout=lists.counters}]{beamer-rl}
 \usepackage{hologo} % pdflatex, xelatex, lualatex logos 
+\usepackage{listings}
 
+\usepackage{tikz}
+
 \babelprovide[import=ar-DZ, main]{arabic}
-\babelfont{sf}{Amiri}
+\babelfont{alm}[Script=Arabic,Scale=.88]{ALM Fixed}
 
 % Themes without Navigation Bars
 %\mode<presentation>{\usetheme{default}}
@@ -59,6 +62,20 @@
 
 \def\cs#1{\babelsublr{\texttt{\textbackslash#1}}}
 
+\lstset{language=TeX,basicstyle=\small\ttfamily,escapeinside={(*@}{@*)},aboveskip=3pt,belowskip=3pt}         
+
+\lstnewenvironment{codeblock}{%
+\selectlanguage{nil}
+\smallskip\hfill%
+\beamercolorbox[wd=\linewidth,sep=.2ex,dp=.5ex]{title}
+}{%
+\endbeamercolorbox
+\hfill
+\smallskip
+%\end{verbatim}
+}
+
+
 \begin{document}
 
 \parskip=6pt
@@ -86,7 +103,7 @@
 \verb|babel| وخصوصا الكتابة بالاتجاهين (\verb|bidi| writing)    
 
 هذه الفئة (class) تعدل في بعض اوامر وتعليمات beamer لغرض انشاء عروض من اليمين إلى اليسار (العربية على سبيل المثال)، الفئة تستدعي \verb|babel| مع الخيار 
-\verb|bidi=basic-r|
+\verb|bidi=basic|
  والمعالجة تتطلب استخدام 
 \hologo{LuaLaTeX} 
 
@@ -97,20 +114,19 @@
 \begin{frame}[fragile]
 \frametitle{كيفية استعمال الفئة}
 
-\selectlanguage{nil}
-
-\begin{verbatim}
+\begin{codeblock}
 \documentclass{beamer-rl}
-\babelprovide[import=ar-DZ, main]{arabic}
-\babelfont{sf}{Amiri}
 
-\mode<presentation>{\usetheme{Warsaw}}
+% import languages
+\babelprovide[import=ar-DZ, main]{arabic} 
+
+\usetheme{CambridgeUS}
+
 \begin{document}
 ...
 \end{document}
+\end{codeblock}
 
-\end{verbatim}
-
 \end{frame}
 
 \section{بعض الملاحظات}
@@ -119,7 +135,16 @@
 \frametitle{بعض الملاحظات}
 
 \begin{itemize}
+
 \item
+الفئة تعرف خط الأميري (\verb:Amiri:) ضمنيا كخط أساسي للكتابة 
+\babelsublr{sans serif}، يمكن تغيير ذلك مع بداية الوثيقة باستعمال التعليمة 
+
+\begin{codeblock}
+\babelfont{sf}{<font name>}
+\end{codeblock}
+
+\item
 يمكن اضافة كل الخيارات التي تتيحها الفئة \verb:beamer: عند استدعاء الفئة \verb:beamer-rl:
 
 كما يمكن تمرير خيارات اضافية للحزمة 
@@ -128,12 +153,10 @@
 
 \medskip 
  
-{\selectlanguage{nil}
-\verb:\documentclass[babel={<babel options>}]{beamer-rl}:
-}
+\begin{codeblock}
+\documentclass[babel={<babel options>}]{beamer-rl}
+\end{codeblock}
 
-\medskip
-
 \item
 الفئة 
  \verb:beamer-rl: تقوم بتبادل لكل من التعليمتين  \cs{blacktriangleright} و   \cs{blacktriangleleft} في حالة نص من اليمين لليسار
@@ -164,15 +187,10 @@
 للفئة يمكن من استدعاء قاموس عربي لترجمة بعض المفردات مثل 
 \verb:example: ،\verb:definition: ،\verb:theorem: ....  
 
+\begin{codeblock}
+\documentclass[arabic]{beamer-rl}
+\end{codeblock}
 
-\medskip 
- 
-{\selectlanguage{nil}
-\verb:\documentclass[arabic]{beamer-rl}:
-}
-
-\medskip
- 
 \item
 في بعض الحالات يمكن استعمال التعليمة 
  \cs{babelsublr} التي توفرها الحزمة  \verb:bebel: 
@@ -179,32 +197,35 @@
 لادراج نص من اليسار لليمين (لاتيني) في وسط نص من اليمين لليسار،
  على سبيل المثال  في حال الحاجة إلى ادراج رسم  
  \verb:pspicture: ضمن نص من اليمين لليسار. 
-
-\medskip 
  
-{\selectlanguage{nil}
-\verb:\bebelsublr{LTR context ... }:
-}
+\begin{codeblock}
+\bebelsublr{LTR context ... }
+\end{codeblock}
 
 \end{itemize}
 
+\end{frame}
 
+\section{أمثلة}
+
+\begin{frame}[plain]{}
+
+\fontsize{70}{60}\selectfont\centerline{أمثـلة}
+
 \end{frame}
 
 
-\section{أمثلة}
 \subsection{الإطارات}
 
 \begin{frame}[fragile]
 \frametitle{الإطارات}
 
-{\selectlanguage{nil}
-\verb:\setbeamertemplate{blocks}[default]:
-}
+\begin{codeblock}
+\setbeamertemplate{blocks}[default]
+\end{codeblock}
 
 \setbeamertemplate{blocks}[default]
 
-
 \begin{block}{أورستد}
   لاحظ هانز أورستد في 21 أبريل 1820 وهو يُعد أحد التجارب أن إبرة
   البوصلة تنحرف عن اتجاهها نحو الشمال عندما كان يغلق ويفتح التيار في
@@ -211,9 +232,9 @@
   دائرة كهربائية يُعدها.
 \end{block}
 
-{\selectlanguage{nil}
-\verb:\setbeamertemplate{blocks}[rounded][shadow=true]:
-}
+\begin{codeblock}
+\setbeamertemplate{blocks}[rounded][shadow=true]
+\end{codeblock}
 
 \setbeamertemplate{blocks}[rounded][shadow=true]
 
@@ -227,53 +248,99 @@
 
 \subsection{القوائم}
 
-\begin{frame}[fragile]
-\frametitle{enumerate, itemize}
+\begin{frame}[fragile,allowframebreaks]
+\frametitle{القوائم}
 
+\begin{columns}[t,onlytextwidth]
+
+\begin{column}{2cm}
 \begin{enumerate}
-\item فيزياء تطبيقية
-\item فيزياء تجريبية
-\item فيزياء نظرية
+\item أولا 
+\item ثانيا 
 \end{enumerate}
+\end{column}
+\begin{column}{8.8cm}
+\begin{codeblock}
+\setbeamertemplate{enumerate item}[ball]
+\begin{enumerate}
+\item (*@\almfamily  أولا @*)  
+\item (*@\almfamily  ثانيا @*)
+\end{enumerate}
+\end{codeblock}
+\end{column}
 
+\end{columns}
+
+\vfill
 \setbeamertemplate{itemize item}[triangle]
 
-{\selectlanguage{nil}
-\verb|\setbeamertemplate{itemize item}[triangle]|
-}
+\begin{columns}[t,onlytextwidth]
 
+\begin{column}{2cm}
 \begin{itemize}
-\item فيزياء تطبيقية
-\item فيزياء تجريبية
-\item فيزياء نظرية
+\item أولا
+\item ثانيا 
 \end{itemize}
+\end{column}
+\begin{column}{8.8cm}
+\begin{codeblock}
+% in RTL context
+\setbeamertemplate{itemize item}[triangle]
+\begin{itemize}
+\item (*@\almfamily  أولا @*)  
+\item (*@\almfamily  ثانيا @*)  
+\end{itemize}
+\end{codeblock}
+\end{column}
 
+\end{columns}
+
+\framebreak
+
 \selectlanguage{nil}
-\shapemode=2
 
+\begin{columns}[t]
+\begin{column}{2cm}
 \begin{itemize}
-\item first item
-\item second item
-\item third item
+\item First
+\item Second 
 \end{itemize}
+\end{column}
+\begin{column}{8.8cm}
+\begin{codeblock}
+% in LTR context 
+\setbeamertemplate{itemize item}[triangle]
+\begin{itemize}
+\item First
+\item Second 
+\end{itemize}
+\end{codeblock}
+\end{column}
+\end{columns}
 
 \end{frame}
 
 \subsection{الروابط}
 
-\begin{frame}
+\begin{frame}[fragile]
 \frametitle{الروابط}
 \begin{itemize}
 \item<1-> العنصر الأول.
 \item<2-> العنصر الثاني.
-\item<3-> العنصر الثالث.
 \end{itemize}
-\hyperlink{jumptosecond}{\beamerreturnbutton{الرجوع إلى الشريحة الثانية}}
-\hypertarget<2>{jumptosecond}{}
+\hyperlink{jumptosecond}{\beamerreturnbutton{الرجوع إلى الشريحة الأولى}}
+\hypertarget<1>{jumptosecond}{}
 
+\pause
+
+\begin{codeblock}
+\hyperlink{jumptofirst}
+{\beamergotobutton{(*@\almfamily الرجوع إلى الشريحة الأولى@*)}}
+\hypertarget<1>{jumptofirst}{}
+\end{codeblock}
+
 \end{frame}
 
-
 \subsection{النظريات}
 
 \begin{frame}
@@ -297,20 +364,20 @@
 
 \subsection{التكبير}
 
+
 \begin{frame}[fragile]
 \frametitle{التكبير}
 
-\framezoom<1><2>[border=2](3cm,2cm)(2cm,2cm)
-\pgfimage[height=5cm]{example-image}
+\framezoom<1><2>[border=2](1cm,1cm)(2cm,2cm)
+\pgfimage[height=4cm]{example-image}
 
-\selectlanguage{nil}
-
-\begin{verbatim}
-\framezoom<1><2>[border=2](3cm,2cm)(2cm,2cm)
-% (3cm,2cm)=(<upper right x>,<upper right y>)
+\begin{codeblock}
+\framezoom<1><2>[border=2](1cm,1cm)(2cm,2cm)
+% (1cm,1cm)=(<upper right x>,<upper right y>)
 % (2cm,2cm)=(<zoom area width>,<zoom area depth>)
 \pgfimage[height=5cm]{example-image}
-\end{verbatim}
+\end{codeblock}
+
 \end{frame}
 
 \end{document}

Modified: branches/branch2020.0/Master/texmf-dist/doc/lualatex/beamer-rl/Example-of-use-en.pdf
===================================================================
(Binary files differ)

Modified: branches/branch2020.0/Master/texmf-dist/doc/lualatex/beamer-rl/Example-of-use-en.tex
===================================================================
--- branches/branch2020.0/Master/texmf-dist/doc/lualatex/beamer-rl/Example-of-use-en.tex	2021-03-18 21:12:06 UTC (rev 58517)
+++ branches/branch2020.0/Master/texmf-dist/doc/lualatex/beamer-rl/Example-of-use-en.tex	2021-03-18 21:12:20 UTC (rev 58518)
@@ -1,9 +1,9 @@
 \documentclass[arabic,babel={layout=lists}]{beamer-rl}
 \usepackage{hologo} % pdflatex, xelatex, lualatex logos 
+\usepackage{verbatim}
 
 \babelprovide[import=ar-DZ, main]{arabic}
 \babelprovide[import,language=Default]{english}
-\babelfont{sf}{Amiri}
 
 % Themes without Navigation Bars
 %\mode<presentation>{\usetheme{default}}
@@ -53,11 +53,30 @@
 {\color{blue} Bug tracker: } https://github.com/seloumi/beamer-rl/issues
 }
 
-
 \date{{\selectlanguage{english} \today}}
 
 \setbeamercovered{transparent=10}
 
+% reduce space above and below verbatim env
+\makeatletter
+\preto{\@verbatim}{\topsep=0pt \partopsep=0pt }
+\makeatother
+
+\newenvironment{codeblock}{%
+\selectlanguage{nil}
+\smallskip\hfill%
+\beamercolorbox[wd=\linewidth,sep=.3ex,dp=1ex]{block body}
+\endgraf
+\verbatim
+}{%
+\endverbatim
+\endbeamercolorbox
+\hfill
+\smallskip
+%\end{verbatim}
+}
+
+
 \begin{document}
 
 \parskip=6pt
@@ -76,12 +95,12 @@
 
 \begin{frame}[fragile]
 \frametitle{Introduction}
-Creating beamer presentation for  right to left language  (like arabic) using \hologo{pdfLaTeX} or \hologo{XeLaTeX} still poses many problems due to bugs not currently resolved especially for colors and hyperlinks
+Creating beamer presentation for  right to left languages  (like arabic) using \hologo{pdfLaTeX} or \hologo{XeLaTeX} still poses many problems due to bugs not currently resolved especially for colors and hyperlinks
 
 The \hologo{LuaTeX} team set solutions for  these issues thanks to them and to \textit{Javier~Bezos} for  his works on the package \verb|babel| and \verb|bidi| writing    
 
-This class provides patchs of some beamer templates and commands 
-for right to left presentation, this package call babel with \verb|bidi=basic-r| option and require lualatex engine
+This class provides patchs of some beamer templates and commands to create  
+ right to left beamer presentation, the class call babel with \verb|bidi=basic| option and require \hologo{LuaLaTeX} engine
 
 \end{frame}
 
@@ -90,20 +109,19 @@
 \begin{frame}[fragile]
 \frametitle{How to use beamer-rl}
 
-\selectlanguage{nil}
-
-\begin{verbatim}
+\begin{codeblock}
 \documentclass{beamer-rl}
-\babelprovide[import=ar-DZ, main]{arabic}
-\babelfont{sf}{Amiri}
 
-\mode<presentation>{\usetheme{Warsaw}}
+% import language
+\babelprovide[import=ar-DZ, main]{arabic} 
+
+\usetheme{Madrid}
+
 \begin{document}
 ...
 \end{document}
+\end{codeblock}
 
-\end{verbatim}
-
 \end{frame}
 
 \section{Some notes}
@@ -114,7 +132,15 @@
 \begin{itemize}
 
 \item
+The class define \verb:Amiri: as default sans serif font, we can 
+modify this in the preambule  with   
 
+\begin{codeblock}
+\babelfont{sf}{<font name>}
+\end{codeblock}
+
+\item
+
 All options provided by \verb:beamer:  can be added  with  \verb:beamer-rl:
 
 Additional options can also be passed to  package 
@@ -121,14 +147,10 @@
  \verb:babel: 
  with  \verb:beamer-rl: like this
 
-\medskip 
- 
-{\selectlanguage{nil}
-\verb:\documentclass[babel={<babel options>}]{beamer-rl}:
-}
+\begin{codeblock}
+\documentclass[babel={<babel options>}]{beamer-rl}
+\end{codeblock}
 
-\medskip
-
 \item
 The \verb:beamer-rl: class swap the definition of \verb:\blacktriangleright: with  \verb:\blacktriangleleft: in RTL context
 
@@ -150,50 +172,46 @@
 
 \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}:
-}
+\begin{codeblock}
+\documentclass[arabic]{beamer-rl}
+\end{codeblock}
 
-\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 ... }:
-}
+\begin{codeblock}
+\bebelsublr{LTR context ... }
+\end{codeblock}
 
 \end{itemize}
 
+\end{frame}
 
+\section{Examples}
+
+\begin{frame}[plain]{}
+
+\fontsize{70}{60}\selectfont\centerline{Examples}
+
 \end{frame}
 
-
-\section{Examples}
 \subsection{Blocks}
 
 \begin{frame}[fragile]
 \frametitle{Blocks}
 
-{\selectlanguage{nil}
-\verb:\setbeamertemplate{blocks}[default]:
-}
+\begin{codeblock}
+\setbeamertemplate{blocks}[default]
+\end{codeblock}
 
 \setbeamertemplate{blocks}[default]
 
-
 \begin{block}{Lorem}
   \selectlanguage{nil} 
   On 21 April 1820, during a lecture, Ørsted
@@ -201,9 +219,9 @@
   electric current from a battery was switched on and off.
 \end{block}
 
-{\selectlanguage{nil}
-\verb:\setbeamertemplate{blocks}[rounded][shadow=true]:
-}
+\begin{codeblock}
+\setbeamertemplate{blocks}[rounded][shadow=true]
+\end{codeblock}
 
 \setbeamertemplate{blocks}[rounded][shadow=true]
 
@@ -218,51 +236,98 @@
 
 \subsection{Lists}
 
-\begin{frame}[fragile]
+\begin{frame}[fragile,allowframebreaks]
 \frametitle{enumerate, itemize}
 
+\begin{columns}[t,onlytextwidth]
+
+\begin{column}{2cm}
 \begin{enumerate}
-\item first item
-\item second item
-\item third item
+\item First 
+\item Second 
 \end{enumerate}
+\end{column}
+\begin{column}{8.8cm}
+\begin{codeblock}
+\setbeamertemplate{enumerate item}[ball]
+\begin{enumerate}
+\item First 
+\item Second 
+\end{enumerate}
+\end{codeblock}
+\end{column}
 
+\end{columns}
+
+\vfill
 \setbeamertemplate{itemize item}[triangle]
 
-{\selectlanguage{nil}
-\verb|\setbeamertemplate{itemize item}[triangle]|
-}
+\begin{columns}[t,onlytextwidth]
 
-
+\begin{column}{2cm}
 \begin{itemize}
-\item first item
-\item second item
-\item third item
+\item First
+\item Second 
 \end{itemize}
+\end{column}
+\begin{column}{8.8cm}
+\begin{codeblock}
+% in RTL context
+\setbeamertemplate{itemize item}[triangle]
+\begin{itemize}
+\item First
+\item Second 
+\end{itemize}
+\end{codeblock}
+\end{column}
 
+\end{columns}
+
+\framebreak
+
 \selectlanguage{nil}
-\shapemode=2
 
+\begin{columns}[t]
+\begin{column}{2cm}
 \begin{itemize}
-\item first item
-\item second item
-\item third item
+\item First
+\item Second 
 \end{itemize}
+\end{column}
+\begin{column}{8.5cm}
+\begin{codeblock}
+% in LTR context 
+\setbeamertemplate{itemize item}[triangle]
+\begin{itemize}
+\item First
+\item Second 
+\end{itemize}
+\end{codeblock}
+\end{column}
+\end{columns}
 
-
 \end{frame}
 
 \subsection{Hyperlinks}
 
-\begin{frame}
+\begin{frame}[fragile]
 \frametitle{Hyperlinks}
 \begin{itemize}
-\item<1-> First item.
-\item<2-> Second item.
-\item<3-> Third item.
+\item<1-> First.
+\item<2-> Second.
 \end{itemize}
-\hyperlink{jumptosecond}{\beamergotobutton{return to second slide}}
-\hypertarget<2>{jumptosecond}{}
+
+\hyperlink{jumptofirst}{\beamergotobutton{return to first slide}}
+\hypertarget<1>{jumptofirst}{}
+
+\pause
+
+\begin{codeblock}
+\hyperlink{jumptofirst}
+{\beamergotobutton{return to first slide}}
+\hypertarget<1>{jumptofirst}{}
+\end{codeblock}
+
 \end{frame}
 
 
@@ -292,19 +357,16 @@
 \begin{frame}[fragile]
 \frametitle{Zooming}
 
-\framezoom<1><2>[border=2](3cm,2cm)(2cm,2cm)
-\pgfimage[height=5cm]{example-image}
+\framezoom<1><2>[border=2](1cm,1cm)(2cm,2cm)
+\pgfimage[height=4cm]{example-image}
 
-\selectlanguage{nil}
-
-\begin{verbatim}
-\framezoom<1><2>[border=2](3cm,2cm)(2cm,2cm)
-% (3cm,2cm)=(<upper right x>,<upper right y>)
+\begin{codeblock}
+\framezoom<1><2>[border=2](1cm,1cm)(2cm,2cm)
+% (1cm,1cm)=(<upper right x>,<upper right y>)
 % (2cm,2cm)=(<zoom area width>,<zoom area depth>)
 \pgfimage[height=5cm]{example-image}
-\end{verbatim}
+\end{codeblock}
 
 \end{frame}
 
-
 \end{document}

Modified: branches/branch2020.0/Master/texmf-dist/doc/lualatex/beamer-rl/README.txt
===================================================================
--- branches/branch2020.0/Master/texmf-dist/doc/lualatex/beamer-rl/README.txt	2021-03-18 21:12:06 UTC (rev 58517)
+++ branches/branch2020.0/Master/texmf-dist/doc/lualatex/beamer-rl/README.txt	2021-03-18 21:12:20 UTC (rev 58518)
@@ -1,5 +1,5 @@
 The beamer-rl class
-v1.4a
+v1.4b
 
 This class provides patchs of some beamer templates and commands 
 for right to left presentation, the class require babel with lualatex engine  
@@ -9,12 +9,12 @@
 
   <https://github.com/seloumi/beamer-rl/issues>
 
-Current version release date: 2020/08/21
+Current version release date: 2021/03/15
 
 ___________________
 Salim Bou
 
-Copyright (c) 2019-2020
+Copyright (c) 2019-2021
 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

Modified: branches/branch2020.0/Master/texmf-dist/tex/lualatex/beamer-rl/beamer-rl.cls
===================================================================
--- branches/branch2020.0/Master/texmf-dist/tex/lualatex/beamer-rl/beamer-rl.cls	2021-03-18 21:12:06 UTC (rev 58517)
+++ branches/branch2020.0/Master/texmf-dist/tex/lualatex/beamer-rl/beamer-rl.cls	2021-03-18 21:12:20 UTC (rev 58518)
@@ -1,6 +1,6 @@
 \NeedsTeXFormat{LaTeX2e}
 \ProvidesClass{beamer-rl}
-[2020/08/04 v1.4a  LaTeX class to patch beamer for right to left presentation with babel]
+[2021/03/12 v1.4b  LaTeX class to patch beamer for right to left presentation with babel]
 
 \RequirePackage{kvoptions}
 \RequirePackage{kvsetkeys}
@@ -32,12 +32,12 @@
 
 \ifluatex
 \else
-\ClassError{beamer-rl}{beamer-rl require luatex}
+\ClassError{beamer-rl}{beamer-rl require lualatex}
 \fi
 
 \LoadClass[hyperref={unicode}]{beamer}
 
-\RequirePackage[nil,bidi=basic-r]{babel}
+\RequirePackage[nil,bidi=basic]{babel}
 
 \def\reset at temp#1#2{\expandafter\let\csname beamer@@tmpop@#1@#2\endcsname\relax}
 \def\@@defbeamertemplate#1#2{\reset at temp{#1}{#2}\defbeamertemplate{#1}{#2}}
@@ -90,11 +90,15 @@
 	%
 	\vskip4bp
 	\setbox\bmb at box=\hbox{%
-		\begin{minipage}[b]{\bmb at width}%
+	\begin{minipage}[b]{\bmb at width}%
 			\usebeamercolor[fg]{\bmb at upper}%
 			#2%
 	\end{minipage}}%
 	\ifdim\wd\bmb at box=0pt%
+	\ifcase\bbl at thetextdir\relax
+           \else%
+           \bmb at dimc=\bmb at width%
+           \fi% <--
 	\setbox\bmb at box=\hbox{}%
 	\ht\bmb at box=1.5pt%
 	\bmb at prevheight=-4.5pt%
@@ -111,12 +115,8 @@
 	\bmb at temp=\bmb at width%
 	\bmb at dima=\bmb at temp\advance\bmb at dima by2.2bp%
 	\bmb at dimb=\bmb at temp\advance\bmb at dimb by4bp%
-	\bmb at dimc=0pt%
-	\ifdim\wd\bmb at box=0pt
-	\bmb at dimc=\bmb at width%
-	\fi
-	\hbox{%
-		\textdir TLT\begin{pgfpicture}{0bp}{+-\ht\bmb at box}{\bmb at dimc}{+-\ht\bmb at box}
+    \hbox dir TLT {%
+		\begin{pgfpicture}{0bp}{+-\ht\bmb at box}{\bmb at dimc}{+-\ht\bmb at box}
 			\ifdim\wd\bmb at box=0pt%
 			\color{lower.bg}%
 			\else%
@@ -153,11 +153,6 @@
 	\nointerlineskip%
 	\vskip-0.5pt%
 	\fi%
-	\ifbmb at shadow%
-	\setbox\bmb at boxshadow=\hbox{\pgfuseshading{bmb at shadow}}%
-	\setbox\bmb at boxshadowball=\hbox{\pgfuseshading{bmb at shadowball}}%
-	\setbox\bmb at boxshadowballlarge=\hbox{\pgfuseshading{bmb at shadowballlarge}}%
-	\fi%
 	\setbox\bmb at colorbox=\hbox{{\pgfpicturetrue\pgfsetcolor{lower.bg}}}%
 	\setbox\bmb at box=\hbox\bgroup\begin{minipage}[b]{\bmb at width}%
 		\vskip2pt%
@@ -166,115 +161,12 @@
 		\colorlet{structure}{upper.bg}%
 		%\color{.}%
 	}
-	
-	\def\endbeamerboxesrounded{%
-	\end{minipage}\egroup%
-	\wd\bmb at box=\bmb at width%
-	\bmb at temp=\dp\bmb at box%
-	\advance\bmb at temp by.5pt%
-	\setbox\bmb at box=\hbox{\raise\bmb at temp\hbox{\box\bmb at box}}%
-	\dp\bmb at box=0pt%
-	\bmb at temp=\wd\bmb at box%
-	\bmb at dima=\bmb at temp\advance\bmb at dima by2.2bp%
-	\bmb at dimb=\bmb at temp\advance\bmb at dimb by4bp%
-	\hbox{%
-		\textdir TLT\begin{pgfpicture}{0bp}{0bp}{0bp}{0bp}
-			\ifbmb at shadow%
-			{\pgftransformshift{\pgfpoint{4bp}{-3bp}}\pgftext{\copy\bmb at boxshadowball}}
-			\begin{pgfscope}
-				{%
-					\advance\bmb at temp by-1bp%
-					\pgfpathrectangle{\pgfpoint{\bmb at temp}{-7bp}}{\pgfpoint{9bp}{9bp}}%
-					\pgfusepath{clip}
-				}%
-				{\pgftransformshift{\pgfpoint{\bmb at temp}{1bp}}\pgftext{\box\bmb at boxshadowballlarge}}
-			\end{pgfscope}
-			\begin{pgfscope}
-				\advance\bmb at temp by-4bp%
-				\pgfpathrectangle{\pgfpoint{4bp}{-7bp}}{\pgfpoint{\bmb at temp}{5bp}}
-				\pgfusepath{clip}
-				{\pgftransformshift{\pgfpoint{4bp}{-7bp}}\pgftext[left,base]{\copy\bmb at boxshadow}}%
-			\end{pgfscope}
-			\begin{pgfscope}
-				\advance\bmb at temp by 4bp%
-				\bmb at dima=\ht\bmb at box%
-				\advance\bmb at dima by\bmb at prevheight%
-				\advance\bmb at dima by 4bp%
-				\pgfpathrectangle{\pgfpoint{\bmb at temp}{1bp}}{\pgfpoint{4bp}{\bmb at dima}}
-				\pgfusepath{clip}
-				\advance\bmb at dima by-4bp%
-				{\pgftransformshift{\pgfpoint{\bmb at temp}{\bmb at dima}}\pgftext{\box\bmb at boxshadowball}}
-				\advance\bmb at dima by-1bp%
-				\pgfpathrectangle{\pgfpoint{\bmb at temp}{1bp}}{\pgfpoint{4bp}{\bmb at dima}}
-				\pgfusepath{clip}
-				\advance\bmb at temp by4bp%
-				{\pgftransformshift{\pgfpoint{\bmb at temp}{-3bp}}%
-					\pgftransformrotate{90}%
-					\pgftext[left,base]{\box\bmb at boxshadow}}%
-			\end{pgfscope}
-			\fi%
-			\unhbox\bmb at colorbox%
-			\pgfpathqmoveto{-4bp}{1bp}
-			\pgfpathqcurveto{-4bp}{-1.2bp}{-2.2bp}{-3bp}{0bp}{-3bp}
-			\pgfpathlineto{\pgfpoint{\the\bmb at temp}{-3bp}}
-			\pgfpathcurveto%
-			{\pgfpoint{\the\bmb at dima}{-3bp}}%
-			{\pgfpoint{\the\bmb at dimb}{-1.2bp}}%
-			{\pgfpoint{\the\bmb at dimb}{1bp}}%
-			{
-				\bmb at dima=\ht\bmb at box%
-				\pgfpathlineto{\pgfpoint{\bmb at dimb}{\bmb at dima}}
-				\pgfpathlineto{\pgfpoint{-4bp}{\bmb at dima}}
-				\pgfusepath{fill}
-			}
-			\ifbmb at shadow%
-			{
-				\color{black!50!bg}
-				\pgfsetlinewidth{0pt}
-				\pgfpathmoveto{\pgfpoint{\bmb at dimb}{-.5bp}}
-				\bmb at dima=\ht\bmb at box%
-				\advance\bmb at dima by\bmb at prevheight%
-				\advance\bmb at dima by 1bp%
-				\pgfpathlineto{\pgfpoint{\bmb at dimb}{\bmb at dima}}
-				\pgfusepath{stroke}
-				\bmb at temp=\bmb at dima
-				\advance\bmb at dima by 1bp%
-				\color{black!31!bg}
-				\pgfpathmoveto{\pgfpoint{\bmb at dimb}{\bmb at temp}}
-				\pgfpathlineto{\pgfpoint{\bmb at dimb}{\bmb at dima}}
-				\pgfusepath{stroke}
-				\advance\bmb at dima by 1bp%
-				\advance\bmb at temp by 1bp%
-				\color{black!19!bg}
-				\pgfpathmoveto{\pgfpoint{\bmb at dimb}{\bmb at temp}}
-				\pgfpathlineto{\pgfpoint{\bmb at dimb}{\bmb at dima}}
-				\pgfusepath{stroke}
-				\advance\bmb at dima by 1bp%
-				\advance\bmb at temp by 1bp%
-				\color{black!6!bg}
-				\pgfpathmoveto{\pgfpoint{\bmb at dimb}{\bmb at temp}}
-				\pgfpathlineto{\pgfpoint{\bmb at dimb}{\bmb at dima}}
-				\pgfusepath{stroke}
-				\advance\bmb at dima by 1.5bp%
-				\advance\bmb at temp by 1bp%
-				\color{bg}
-				\pgfpathmoveto{\pgfpoint{\bmb at dimb}{\bmb at temp}}
-				\pgfpathlineto{\pgfpoint{\bmb at dimb}{\bmb at dima}}
-				\pgfusepath{stroke}
-			}
-			\fi
-		\end{pgfpicture}%
-		\box\bmb at box%
-	}%
-	\ifbmb at shadow%
-	\vskip4bp minus 2bp%
-	\else%
-	\vskip2bp%
-	\fi%
-	\egroup% of \vbox\bgroup
-}
 
+\bbl at sreplace\endbeamerboxesrounded{\begin{pgfpicture}}%
+          {\textdir TLT\begin{pgfpicture}}%
 
+
+
 %% beamerbaseauxtemplates
 
 
@@ -347,7 +239,7 @@
 }
 
 \def\insertgotosymbol{%
-	\begin{pgfpicture}{1pt}{0pt}{6pt}{5pt}
+\begin{pgfpicture}{1pt}{0pt}{6pt}{5pt}
 		\pgfuseobject{\ifcase\bbl at thepardir beamergotosymbol\else beamerreturnsymbol\fi}%
 \end{pgfpicture}}
 
@@ -360,7 +252,7 @@
 }
 
 \def\insertreturnsymbol{%
-	\begin{pgfpicture}{1pt}{0pt}{6pt}{5pt}
+\begin{pgfpicture}{1pt}{0pt}{6pt}{5pt}
 		\pgfuseobject{\ifcase\bbl at thepardir beamerreturnsymbol\else beamergotosymbol\fi}%
 \end{pgfpicture}}
 
@@ -388,7 +280,7 @@
 }
 
 \def\insertskipsymbol{%
-	\begin{pgfpicture}{-1pt}{0pt}{6pt}{5pt}
+\begin{pgfpicture}{-1pt}{0pt}{6pt}{5pt}
 		\pgfuseobject{\ifcase\bbl at thepardir beamerskipsymbol\else beamerskipsymbolrl\fi}%
 \end{pgfpicture}}
 
@@ -466,16 +358,17 @@
       \dp\@tempboxa=0pt%
       \setbox\beamer at framebox=\vbox to\beamer at frametextheight{{%
           \ifbeamer at plainframe\beamer at leftmargin=\Gm at lmargin\fi%
+          \ifcase\bbl at thepardir \else\multiply\@tempdimb by -1\relax\fi%
           \begin{oldpgfpicture}{\beamer at leftmargin}{-\beamer at frametextheight}{\beamer at leftmargin}{0pt}
-            \pgftext[left,top]{\box\@tempboxa}
-            \pgfpathrectangle{\pgfpoint{0pt}{-\@tempdimc}}{\pgfpoint{\ifcase\bbl at thepardir \else-\fi\@tempdimb}{\@tempdimc}}%
+           \pgftext[left,top]{\box\@tempboxa}
+            \pgfpathrectangle{\pgfpoint{0pt}{-\@tempdimc}}{\pgfpoint{\@tempdimb}{\@tempdimc}}%
             \pgfusepath{clip}
             \begingroup
-              \pgftransformscale{\beamer at temp}
+            \pgftransformscale{\beamer at temp}
               \@tempdima=#4\relax%
               \@tempdimb=#5\relax%
               {\pgftransformshift{\pgfpoint{-\@tempdima}{\@tempdimb}}%
-              \pgftext[left,top]{\vbox{\vbox{}\nointerlineskip\unvbox\beamer at framebox}}}
+              \pgftext[left,top]{\vbox{\vbox{}\nointerlineskip\unvbox\beamer at framebox }}}
             \endgroup
           \end{oldpgfpicture}%
         }}%
@@ -498,30 +391,33 @@
 % Shrink stuff
 %
 
-\def\beamer at shrinkframebox{%
-  \@tempdima=\ht\beamer at framebox%
-%  \ifdim\@tempdima>\beamer at frametextheight%
-    \@tempcnta=\@tempdima%
-    \divide\@tempcnta by 65536\relax%
-    \@tempdimc=\beamer at frametextheight%
-    \divide\@tempdimc by\@tempcnta\relax%
-    \ifdim\@tempdimc>\beamer at shrinkfactor pt%
-      \@tempdimc=\beamer at shrinkfactor pt%
-    \else%
-      \@tempdima=-100\@tempdimc%
-      \advance\@tempdima by100pt%
-      \ClassWarning{beamer}{Frame text is shrunk by a factor of %
-      \strip at pt\@tempdima\space percent instead of
-      \beamer at shrinkpercentage\space percent}%
-    \fi%
-    \edef\beamer at factortemp{\strip at pt\@tempdimc}%
-    \setbox\beamer at framebox=\vbox to\beamer at frametextheight{%
-      \begin{oldpgfpicture}{0pt}{-\beamer at frametextheight}{0pt}{0pt}
-        {\pgftransformscale{\beamer at factortemp}%
-          \pgftext[left,top]{\box\beamer at framebox}}%
-      \end{oldpgfpicture}%
-    }%
-%  \fi%
-}
 
-\endinput
+ \bbl at sreplace\beamer at shrinkframebox{\vbox}%
+          {\vbox dir TLT}%
+
+% Temporary workaround for issue of \shapemode bug 
+% https://github.com/latex3/babel/issues/13
+% this work fine with lists inside frame, if they are included within \vbox
+% may be we need to insert \shapemode=2  or \shapemode=0 manualy  at beginning of list
+% \begin{enumerate} \shapemode=.. &  \begin{itemize} \shapemode=..
+
+\newcounter{beginframepardir}
+
+\let\oldframe\frame
+\def\frame{\setcounter{beginframepardir}{\bbl at getluadir{par}}
+% 0 for TLT 1 for TRT 
+\oldframe}
+
+\redefbeamertemplate*{itemize/enumerate body begin}{default}{\ifnum\value{beginframepardir}=\bbl at getluadir{par} \else\shapemode=2\fi}
+
+\redefbeamertemplate*{description body begin}{default}{\ifnum\value{beginframepardir}=\bbl at getluadir{par} \else\shapemode \tw@\fi}
+
+% Use Amiri as default sans serif font
+
+\font\sffont at rl="Amiri" at 10pt
+\ifx\sffont at rl\nullfont
+\else
+\babelfont{sf}{Amiri}
+\fi
+
+\endinput
\ No newline at end of file



More information about the tex-live-commits mailing list.