texlive[65652] Master/texmf-dist: luaquotes (26jan23)

commits+karl at tug.org commits+karl at tug.org
Fri Jan 27 23:03:16 CET 2023


Revision: 65652
          http://tug.org/svn/texlive?view=revision&revision=65652
Author:   karl
Date:     2023-01-27 23:03:16 +0100 (Fri, 27 Jan 2023)
Log Message:
-----------
luaquotes (26jan23)

Modified Paths:
--------------
    trunk/Master/texmf-dist/doc/lualatex/luaquotes/README
    trunk/Master/texmf-dist/doc/lualatex/luaquotes/luaquotes-documentation.pdf
    trunk/Master/texmf-dist/doc/lualatex/luaquotes/luaquotes-documentation.tex
    trunk/Master/texmf-dist/tex/lualatex/luaquotes/luaquotes.sty

Modified: trunk/Master/texmf-dist/doc/lualatex/luaquotes/README
===================================================================
--- trunk/Master/texmf-dist/doc/lualatex/luaquotes/README	2023-01-27 22:02:53 UTC (rev 65651)
+++ trunk/Master/texmf-dist/doc/lualatex/luaquotes/README	2023-01-27 22:03:16 UTC (rev 65652)
@@ -1,6 +1,6 @@
 luaquotes - smart quotes with lua
 
-version: 1.3.0
+version: 1.4.0
 
 This package automatically creates smart quotes using lua filters and provides auxiliary commands for typesetting specific lua punctuation
 
@@ -12,6 +12,7 @@
 GitHub site:  https://github.com/ezgranet/luaquotes
 
 Version history: 
+25/01/2023—added support for Swiss German quotations
 15/01/2023—fixed single quotations within parentheses 
 12/12/2022-added degm function
 23/11/2022-walking back automatic elision for now

Modified: trunk/Master/texmf-dist/doc/lualatex/luaquotes/luaquotes-documentation.pdf
===================================================================
(Binary files differ)

Modified: trunk/Master/texmf-dist/doc/lualatex/luaquotes/luaquotes-documentation.tex
===================================================================
--- trunk/Master/texmf-dist/doc/lualatex/luaquotes/luaquotes-documentation.tex	2023-01-27 22:02:53 UTC (rev 65651)
+++ trunk/Master/texmf-dist/doc/lualatex/luaquotes/luaquotes-documentation.tex	2023-01-27 22:03:16 UTC (rev 65652)
@@ -68,7 +68,7 @@
 {latex}
 \usepackage{luaquotes}
 \end{minted}
-The French and German options, for those languages' punctuation, are called by the following respective commands.  
+The French, German, German (guillemets), and Swiss German options, for those languages' punctuation, are called by the following respective commands.  
 \begin{minted}[
 frame=lines,
 framesep=2mm,
@@ -80,7 +80,8 @@
 {latex}
 \usepackage[fr]{luaquotes} %French
 \usepackage[de]{luaquotes} % German
-\usepackage[degm]{luaquotes} % German with French-style quotes
+\usepackage[degm]{luaquotes} % German with guillemets
+\usepackage[dech]{luaquotes} %Swiss German
 \end{minted}
 \subsubsection{English Features}
 The English features are designed to smartly recognise English punctuation:
@@ -88,7 +89,7 @@
 \renewcommand{\arraystretch}{2}
 \begin{tabular}{ccc}
 \ttfamily Feature & User input & Output\\
- Double Quotes &  \LARGE\texttt{"Salut!"}%
+ Double Quotes &  \LARGE\texttt{"Hello!"}%
 & 
 \LARGE "Hello"\\
 Single Quotes& \LARGE\texttt{'Hello!'}%
@@ -124,8 +125,8 @@
 
 \end{tabular}
 \end{center}
-\subsubsection{The German (\texttt{degm}) option}
-The German (\texttt{degm}) option produces the following output:
+\subsubsection{The German (guillemets) option}
+The German (guillemets) option produces the following output:
 
 \begin{center}
 \renewcommand{\arraystretch}{2}
@@ -139,8 +140,21 @@
 \end{tabular}
 \end{center}
 
+\subsubsection{The Swiss German option}
+The Swiss German option produces the following output:
 
+\begin{center}
+\renewcommand{\arraystretch}{2}
+\begin{tabular}{cc}
+\ttfamily User input &Output\\
+\LARGE\texttt{"Hallo!"}%
+&  \LARGE \glmtl Hallo!\glmtr\\
+\LARGE\texttt{'Hallo!'}%
+&  \LARGE \sglmtl Hallo!\sglmtr\\
 
+\end{tabular}
+\end{center}
+
 \subsection{Activation and De-activation}
 The package automatically activates the smart quotes function at the beginning of the document. To deactivate the smart quotes function within a document, the following commands are used:
 \begin{minted}[
@@ -291,9 +305,10 @@
 ]
 {latex}
 
-\def\luaquotesversionnumber{1.3.0}
+
+\def\luaquotesversionnumber{1.4.0}
 \ProvidesPackage{luaquotes}
-  [2023/15/15\luaquotesversionnumber smart quotes with lua]
+  [2023/01/25\luaquotesversionnumber smart quotes with lua]
   % !TeX program = lualatex                                   
 % !TeX encoding = utf8
 % This work may be distributed and/or modified under the 
@@ -475,7 +490,34 @@
 \newcommand\frsinglequotespcloseoff{\directlua{luatexbase.remove_from_callback (
    "process_input_buffer" , "frpsinglequotesclose" )}}
 
+%%%%%%%%%%%%%%%%%%%%%%%%%%%
+%%%%%%%%%%%%%%%%%%%%%%%%%%%
+% DECH Parentheses
+%%%%%%%%%%%%%%%%%%%%%%%%%%%
+%%%%%%%%%%%%%%%%%%%%%%%%%%%
+\newcommand{\sglmtlpdech}{{\addfontfeature{RawFeature={-qtbye,-tlig}}‹}}
+\newcommand{\sglmtrpdech}{{\addfontfeature{RawFeature={-qtbye,-tlig}}›}}
 
+\luaexec{function dechpsinglequotes ( s )
+           return ( s:gsub ( "\%('",[[(\sglmtlpdech]]) )
+         end}
+\luaexec{function dechpsinglequotesclose ( s )
+           return ( s:gsub ( "'\%)",[[\sglmtrpdech)]]) )
+         end}
+
+\newcommand\dechsinglequotespon{\directlua{
+luatexbase.add_to_callback (
+   "process_input_buffer" , dechpsinglequotes , "dechpsinglequotes" )
+   }}
+\newcommand\dechsinglequotespoff{\directlua{luatexbase.remove_from_callback (
+   "process_input_buffer" , "dechpsinglequotes" )}}
+\newcommand\dechsinglequotespcloseon{\directlua{
+luatexbase.add_to_callback (
+   "process_input_buffer" , dechpsinglequotesclose , "dechpsinglequotesclose" )
+   }}
+\newcommand\dechsinglequotespcloseoff{\directlua{luatexbase.remove_from_callback (
+   "process_input_buffer" , "dechpsinglequotesclose" )}}
+
 %%%%%%%%%%%%%%%%%%%%%%%%%%%
 %%%%%%%%%%%%%%%%%%%%%%%%%%%
 % activation and deactivation
@@ -530,8 +572,7 @@
    }
    
        \DeclareOption{en}{
-\AtBeginDocument{\frsmartquotes\frdumbquotes%
-\desmartquotes\dedumbquotes\degmsmartquotes\degmdumbquotes\smartquotes}
+\AtBeginDocument{\dechsmartquotes\dechdumbquotes\frsmartquotes\frdumbquotes\desmartquotes\dedumbquotes\degmsmartquotes\degmdumbquotes\smartquotes}
 \renewcommand{\texttt}[1]{{\ttfamily\addfontfeature{RawFeature={+qtbye,-tlig}} #1}}
     }
 
@@ -654,6 +695,7 @@
 }
    \DeclareOption{de}{
 \AtBeginDocument{
+\dechsmartquotes\dechdumbquotes
 \frsmartquotes
 \frdumbquotes
 \smartquotes
@@ -698,6 +740,7 @@
 \degmsinglequotescloseoff}
    \DeclareOption{degm}{
 \AtBeginDocument{
+\dechsmartquotes\dechdumbquotes
 \frsmartquotes
 \frdumbquotes
 \smartquotes
@@ -747,10 +790,7 @@
 \frsinglequotelinestartoff
 \frsinglequotescloseoff}
    \DeclareOption{fr}{
-\AtBeginDocument{\desmartquotes\dedumbquotes%
-\degmsmartquotes\degmdumbquotes%
-\smartquotes\dumbquotes%
-\dumbquotes\frsmartquotes}
+\AtBeginDocument{\dechsmartquotes\dechdumbquotes\desmartquotes\dedumbquotes\degmsmartquotes\degmdumbquotes\smartquotes\dumbquotes\dumbquotes\frsmartquotes}
 \renewcommand{\texttt}[1]{{\ttfamily\addfontfeature{RawFeature={+qtbye,-tlig}} #1}}
 
 
@@ -757,6 +797,53 @@
 }
 
 %%%%%%%%%%%%%%%%%%%%%%%%%%%
+%%%%%%%%%%%%%%%%%%%%%%%%%%%
+% Deutsch (Schweiz) 
+%%%%%%%%%%%%%%%%%%%%%%%%%%%
+%%%%%%%%%%%%%%%%%%%%%%%%%%%
+\luaexec{function dechdoublequotes ( s )
+           return ( s:gsub ( '"(..-)"' , "«\%1»" ) )
+         end}
+
+
+\luaexec{function dechsinglequotelinestart ( s )
+           return (s:gsub ("^'","'" )  )
+        end}
+\luaexec{function dechsinglequotesclose( s )
+return ( s:gsub ( " '(..-)'", " ‹\%1›" ) )
+         end}
+%% Two utility macros to activate/deactivate the Lua function:
+\newcommand\dechdoublequoteson{\directlua{luatexbase.add_to_callback (
+   "process_input_buffer" ,dechdoublequotes , "dechdoublequotes" )}}
+\newcommand\dechdoublequotesoff{\directlua{luatexbase.remove_from_callback (
+   "process_input_buffer" , "dechdoublequotes" )}}
+\newcommand\dechsinglequotelinestarton{\directlua{luatexbase.add_to_callback (
+   "process_input_buffer" ,dechsinglequotelinestart , "dechsinglequotelinestart" )}}
+\newcommand\dechsinglequotelinestartoff{\directlua{luatexbase.remove_from_callback (
+   "process_input_buffer" , "dechsinglequotelinestart" )}}
+   \newcommand\dechsinglequotescloseon{\directlua{luatexbase.add_to_callback (
+   "process_input_buffer" ,dechsinglequotesclose , "dechsinglequotesclose" )}}
+\newcommand\dechsinglequotescloseoff{\directlua{luatexbase.remove_from_callback (
+   "process_input_buffer" , "dechsinglequotesclose" )}}
+   \newcommand{\dechsmartquotes}{\dechdoublequoteson
+   \dechsinglequotespon
+   \dechsinglequotespcloseon
+\dechsinglequotelinestarton
+\dechsinglequotescloseon}
+   \newcommand{\dechdumbquotes}{\dechdoublequotesoff
+   \dechsinglequotespoff
+   \dechsinglequotespcloseoff
+\dechsinglequotelinestartoff
+\dechsinglequotescloseoff}
+   \DeclareOption{dech}{
+\AtBeginDocument{\desmartquotes\dedumbquotes\degmsmartquotes\degmdumbquotes\smartquotes\dumbquotes\dumbquotes\frsmartquotes\frdumbquotes\dechsmartquotes}
+\renewcommand{\texttt}[1]{{\ttfamily\addfontfeature{RawFeature={+qtbye,-tlig}} #1}}
+
+
+}
+
+
+%%%%%%%%%%%%%%%%%%%%%%%%%%%
 % Default option is English
 %%%%%%%%%%%%%%%%%%%%%%%%%%%
 %%%%%%%%%%%%%%%%%%%%%%%%%%%
@@ -766,8 +853,14 @@
 
 
   
+
+  
 \end{minted}
 \section{Version History}
+\subsection*{\normalfont\texttt{1.4.0}}
+\ttfamily Added support for Swiss German options, on user request
+
+
 \subsection*{\normalfont\texttt{1.3.0}}
 \ttfamily 15 January 2023 fixed single quotes and parentheses
 

Modified: trunk/Master/texmf-dist/tex/lualatex/luaquotes/luaquotes.sty
===================================================================
--- trunk/Master/texmf-dist/tex/lualatex/luaquotes/luaquotes.sty	2023-01-27 22:02:53 UTC (rev 65651)
+++ trunk/Master/texmf-dist/tex/lualatex/luaquotes/luaquotes.sty	2023-01-27 22:03:16 UTC (rev 65652)
@@ -1,6 +1,6 @@
-\def\luaquotesversionnumber{1.3.0}
+\def\luaquotesversionnumber{1.4.0}
 \ProvidesPackage{luaquotes}
-  [2023/15/15\luaquotesversionnumber smart quotes with lua]
+  [2023/01/25\luaquotesversionnumber smart quotes with lua]
   % !TeX program = lualatex                                   
 % !TeX encoding = utf8
 % This work may be distributed and/or modified under the 
@@ -182,7 +182,34 @@
 \newcommand\frsinglequotespcloseoff{\directlua{luatexbase.remove_from_callback (
    "process_input_buffer" , "frpsinglequotesclose" )}}
 
+%%%%%%%%%%%%%%%%%%%%%%%%%%%
+%%%%%%%%%%%%%%%%%%%%%%%%%%%
+% DECH Parentheses
+%%%%%%%%%%%%%%%%%%%%%%%%%%%
+%%%%%%%%%%%%%%%%%%%%%%%%%%%
+\newcommand{\sglmtlpdech}{{\addfontfeature{RawFeature={-qtbye,-tlig}}‹}}
+\newcommand{\sglmtrpdech}{{\addfontfeature{RawFeature={-qtbye,-tlig}}›}}
 
+\luaexec{function dechpsinglequotes ( s )
+           return ( s:gsub ( "\%('",[[(\sglmtlpdech]]) )
+         end}
+\luaexec{function dechpsinglequotesclose ( s )
+           return ( s:gsub ( "'\%)",[[\sglmtrpdech)]]) )
+         end}
+
+\newcommand\dechsinglequotespon{\directlua{
+luatexbase.add_to_callback (
+   "process_input_buffer" , dechpsinglequotes , "dechpsinglequotes" )
+   }}
+\newcommand\dechsinglequotespoff{\directlua{luatexbase.remove_from_callback (
+   "process_input_buffer" , "dechpsinglequotes" )}}
+\newcommand\dechsinglequotespcloseon{\directlua{
+luatexbase.add_to_callback (
+   "process_input_buffer" , dechpsinglequotesclose , "dechpsinglequotesclose" )
+   }}
+\newcommand\dechsinglequotespcloseoff{\directlua{luatexbase.remove_from_callback (
+   "process_input_buffer" , "dechpsinglequotesclose" )}}
+
 %%%%%%%%%%%%%%%%%%%%%%%%%%%
 %%%%%%%%%%%%%%%%%%%%%%%%%%%
 % activation and deactivation
@@ -237,7 +264,7 @@
    }
    
        \DeclareOption{en}{
-\AtBeginDocument{\frsmartquotes\frdumbquotes\desmartquotes\dedumbquotes\degmsmartquotes\degmdumbquotes\smartquotes}
+\AtBeginDocument{\dechsmartquotes\dechdumbquotes\frsmartquotes\frdumbquotes\desmartquotes\dedumbquotes\degmsmartquotes\degmdumbquotes\smartquotes}
 \renewcommand{\texttt}[1]{{\ttfamily\addfontfeature{RawFeature={+qtbye,-tlig}} #1}}
     }
 
@@ -360,6 +387,7 @@
 }
    \DeclareOption{de}{
 \AtBeginDocument{
+\dechsmartquotes\dechdumbquotes
 \frsmartquotes
 \frdumbquotes
 \smartquotes
@@ -404,6 +432,7 @@
 \degmsinglequotescloseoff}
    \DeclareOption{degm}{
 \AtBeginDocument{
+\dechsmartquotes\dechdumbquotes
 \frsmartquotes
 \frdumbquotes
 \smartquotes
@@ -453,7 +482,7 @@
 \frsinglequotelinestartoff
 \frsinglequotescloseoff}
    \DeclareOption{fr}{
-\AtBeginDocument{\desmartquotes\dedumbquotes\degmsmartquotes\degmdumbquotes\smartquotes\dumbquotes\dumbquotes\frsmartquotes}
+\AtBeginDocument{\dechsmartquotes\dechdumbquotes\desmartquotes\dedumbquotes\degmsmartquotes\degmdumbquotes\smartquotes\dumbquotes\dumbquotes\frsmartquotes}
 \renewcommand{\texttt}[1]{{\ttfamily\addfontfeature{RawFeature={+qtbye,-tlig}} #1}}
 
 
@@ -460,6 +489,53 @@
 }
 
 %%%%%%%%%%%%%%%%%%%%%%%%%%%
+%%%%%%%%%%%%%%%%%%%%%%%%%%%
+% Deutsch (Schweiz) 
+%%%%%%%%%%%%%%%%%%%%%%%%%%%
+%%%%%%%%%%%%%%%%%%%%%%%%%%%
+\luaexec{function dechdoublequotes ( s )
+           return ( s:gsub ( '"(..-)"' , "«\%1»" ) )
+         end}
+
+
+\luaexec{function dechsinglequotelinestart ( s )
+           return (s:gsub ("^'","'" )  )
+        end}
+\luaexec{function dechsinglequotesclose( s )
+return ( s:gsub ( " '(..-)'", " ‹\%1›" ) )
+         end}
+%% Two utility macros to activate/deactivate the Lua function:
+\newcommand\dechdoublequoteson{\directlua{luatexbase.add_to_callback (
+   "process_input_buffer" ,dechdoublequotes , "dechdoublequotes" )}}
+\newcommand\dechdoublequotesoff{\directlua{luatexbase.remove_from_callback (
+   "process_input_buffer" , "dechdoublequotes" )}}
+\newcommand\dechsinglequotelinestarton{\directlua{luatexbase.add_to_callback (
+   "process_input_buffer" ,dechsinglequotelinestart , "dechsinglequotelinestart" )}}
+\newcommand\dechsinglequotelinestartoff{\directlua{luatexbase.remove_from_callback (
+   "process_input_buffer" , "dechsinglequotelinestart" )}}
+   \newcommand\dechsinglequotescloseon{\directlua{luatexbase.add_to_callback (
+   "process_input_buffer" ,dechsinglequotesclose , "dechsinglequotesclose" )}}
+\newcommand\dechsinglequotescloseoff{\directlua{luatexbase.remove_from_callback (
+   "process_input_buffer" , "dechsinglequotesclose" )}}
+   \newcommand{\dechsmartquotes}{\dechdoublequoteson
+   \dechsinglequotespon
+   \dechsinglequotespcloseon
+\dechsinglequotelinestarton
+\dechsinglequotescloseon}
+   \newcommand{\dechdumbquotes}{\dechdoublequotesoff
+   \dechsinglequotespoff
+   \dechsinglequotespcloseoff
+\dechsinglequotelinestartoff
+\dechsinglequotescloseoff}
+   \DeclareOption{dech}{
+\AtBeginDocument{\desmartquotes\dedumbquotes\degmsmartquotes\degmdumbquotes\smartquotes\dumbquotes\dumbquotes\frsmartquotes\frdumbquotes\dechsmartquotes}
+\renewcommand{\texttt}[1]{{\ttfamily\addfontfeature{RawFeature={+qtbye,-tlig}} #1}}
+
+
+}
+
+
+%%%%%%%%%%%%%%%%%%%%%%%%%%%
 % Default option is English
 %%%%%%%%%%%%%%%%%%%%%%%%%%%
 %%%%%%%%%%%%%%%%%%%%%%%%%%%



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