[latex3-commits] [git/LaTeX3-latex3-latex2e] unquote: take extension from final dot (e1a5e812)

[David Carlisle]

Repository : https://github.com/latex3/latex2e
On branch  : unquote
Link       : https://github.com/latex3/latex2e/commit/e1a5e812e8c43dcf0a8a03c5349faf9659970fcc

>---------------------------------------------------------------

commit e1a5e812e8c43dcf0a8a03c5349faf9659970fcc
Author: David Carlisle <d.p.carlisle at gmail.com>
Date:   Fri Nov 1 21:57:49 2019 +0000

    take extension from final dot


>---------------------------------------------------------------

e1a5e812e8c43dcf0a8a03c5349faf9659970fcc
 base/ltdirchk.dtx | 45 +++++++++++++++++++++++++++++++++++++--------
 1 file changed, 37 insertions(+), 8 deletions(-)

diff --git a/base/ltdirchk.dtx b/base/ltdirchk.dtx
index b9db177f..ed4e9032 100644
--- a/base/ltdirchk.dtx
+++ b/base/ltdirchk.dtx
@@ -37,7 +37,7 @@
 %<*driver>
 % \fi
 \ProvidesFile{ltdirchk.dtx}
-             [2016/10/15 v1.2b LaTeX Kernel (System Dependent Parts)]
+             [2019/11/01 v1.3a LaTeX Kernel (System Dependent Parts)]
 % \iffalse
 \documentclass{ltxdoc}
 \GetFileInfo{ltdirchk.dtx}
@@ -918,14 +918,43 @@
 %
 % |\filename at simple| is used by all three versions.
 % Finally we can split off the extension.
+% \changes{v1.3a}{2019/11/01}
+%         {take last . not first}
 %    \begin{macrocode}
-  \def\filename at simple#1.#2\\{%
-    \ifx\\#2\\%
-       \let\filename at ext\relax
-    \else
-       \edef\filename at ext{\filename at dot#2\\}%
-    \fi
-    \edef\filename at base{#1}}
+%</dircheck>
+%<*dircheck,latexrelease>
+%<latexrelease>\IncludeInRelease{2019/10/01}{\filename at simple}
+%<latexrelease>                             {Final dot for extension}%
+\def\filename at simple#1.#2\\{%
+  \ifx\\#2\\%
+    \let\filename at ext\relax
+    \edef\filename at base{#1}%
+  \else
+    \filename at dots{#1}#2\\
+  \fi}
+%    \end{macrocode}
+%
+%    \begin{macrocode}
+\def\filename at dots#1#2.#3\\{%
+  \ifx\\#3\\%
+    \def\filename at ext{#2}%
+    \edef\filename at base{#1}%
+  \else
+    \filename at dots{#1.#2}#3\\%
+  \fi}
+%<latexrelease>\EndIncludeInRelease
+%<latexrelease>\IncludeInRelease{0000/00/00}{\filename at simple}
+%<latexrelease>                             {Final dot for extension}%
+%<latexrelease>  \def\filename at simple#1.#2\\{%
+%<latexrelease>    \ifx\\#2\\%
+%<latexrelease>       \let\filename at ext\relax
+%<latexrelease>    \else
+%<latexrelease>       \edef\filename at ext{\filename at dot#2\\}%
+%<latexrelease>    \fi
+%<latexrelease>    \edef\filename at base{#1}}
+%<latexrelease>\EndIncludeInRelease
+%</dircheck,latexrelease>
+%<*dircheck>
 %    \end{macrocode}
 %
 % Remove a final dot, added earlier.