%\iffalse %<*package> %% \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 %% Digits \0\1\2\3\4\5\6\7\8\9 %% Exclamation \! Double quote \" Hash (number) \# %% Dollar \$ Percent \% Ampersand \& %% Acute accent \' Left paren \( Right paren \) %% Asterisk \* Plus \+ Comma \, %% Minus \- Point \. Solidus \/ %% Colon \: Semicolon \; Less than \< %% Equals \= Greater than \> Question mark \? %% Commercial at \@ Left bracket \[ Backslash \\ %% Right bracket \] Circumflex \^ Underscore \_ %% Grave accent \` Left brace \{ Vertical bar \| %% Right brace \} Tilde \~} % %\fi % \iffalse % Doc-Source file to use with LaTeX2e % Copyright (C) 2018 Nicola Talbot, all rights reserved. % (New maintainer add relevant lines here.) % \fi % \iffalse %<*driver> \documentclass{ltxdoc} \usepackage{alltt} \usepackage{graphicx} \usepackage{fontspec} \usepackage[colorlinks, bookmarks, hyperindex=false, pdfauthor={Nicola L.C. Talbot}, pdftitle={datetime2.sty Lower Sorbian Module}]{hyperref} \setmainfont{Liberation Serif} \setmonofont{Liberation Mono} \CheckSum{395} \renewcommand*{\usage}[1]{\hyperpage{#1}} \renewcommand*{\main}[1]{\hyperpage{#1}} \IndexPrologue{\section*{\indexname}\markboth{\indexname}{\indexname}} \setcounter{IndexColumns}{2} \newcommand*{\sty}[1]{\textsf{#1}} \newcommand*{\opt}[1]{\texttt{#1}\index{#1=\texttt{#1}|main}} \RecordChanges \PageIndex \CodelineNumbered \begin{document} \DocInput{datetime2-lsorbian.dtx} \end{document} % %\fi % %\MakeShortVerb{"} % %\title{Lower Sorbian Module for datetime2 Package} %\author{Nicola L. C. Talbot (inactive)} %\date{2018-05-18 (v1.1)} %\maketitle % %This module is currently unmaintained and may be subject to change. %If you want to volunteer to take over maintanance, contact me at %\url{http://www.dickimaw-books.com/contact.html} % %\begin{abstract} %This is the Lower Sorbian language module for the \sty{datetime2} %package. If you want to use the settings in this module you must %install it in addition to installing \sty{datetime2}. If you use %\sty{babel} or \sty{polyglossia}, you will need this module to %prevent them from redefining \cs{today}. The \sty{datetime2} % \opt{useregional} setting must be set to "text" or "numeric" % for the language styles to be set. % Alternatively, you can set the style in the document using % \cs{DTMsetstyle}, but this may be changed by \cs{date}\meta{language} % depending on the value of the \opt{useregional} setting. %\end{abstract} % %I've copied the date style from \texttt{babel-lsorbian}'s \cs{today}. % %I don't know if these settings are correct as I can't speak Lower Sorbian. %In particular, I don't know if the "lsorbian" time style is %correct. Currently this just uses the "default" time style. Please %be aware that this may change. Whoever takes over maintanance %of this module may can change it as appropriate. % %The new maintainer should add the line: %\begin{verbatim} % The Current Maintainer of this work is Name. %\end{verbatim} %to the preamble part in \texttt{datetime2-lsorbian.ins} where Name %is the name of the maintainer(s) and replace %the `inactive' status to `maintained'. % %Currently there is only a regionless style. % %\StopEventually{% %\clearpage %\phantomsection %\addcontentsline{toc}{section}{Change History}% %\PrintChanges %\addcontentsline{toc}{section}{\indexname}% %\PrintIndex} %\section{The Code} %\iffalse % \begin{macrocode} %<*datetime2-lsorbian-utf8.ldf> % \end{macrocode} %\fi %\subsection{UTF-8} %This file contains the settings that use UTF-8 characters. This %file is loaded if XeLaTeX or LuaLaTeX are used. Please make sure %your text editor is set to UTF-8 if you want to view this code. %\changes{1.0}{2015-03-30}{Initial release} % Identify module % \begin{macrocode} \ProvidesDateTimeModule{lsorbian-utf8}[2018/05/18 v1.1] % \end{macrocode} %\begin{macro}{\DTMlsorbianordinal} % \begin{macrocode} \newcommand*{\DTMlsorbianordinal}[1]{% \number#1.% } % \end{macrocode} %\end{macro} % % %\begin{macro}{\DTMlsorbiannewmonthname} % Lower Sorbian month names. % \begin{macrocode} \newcommand*{\DTMlsorbiannewmonthname}[1]{% \ifcase#1 \or januara% \or februara% \or měrca% \or apryla% \or maja% \or junija% \or julija% \or awgusta% \or septembra% \or oktobra% \or nowembra% \or decembra% \fi } % \end{macrocode} %\end{macro} % %\begin{macro}{\DTMlsorbiannewMonthname} % As above but capitalize. % \begin{macrocode} \newcommand*{\DTMlsorbiannewMonthname}[1]{% \ifcase#1 \or Januara% \or Februara% \or Měrca% \or Apryla% \or Maja% \or Junija% \or Julija% \or Awgusta% \or Septembra% \or Oktobra% \or Nowembra% \or Decembra% \fi } % \end{macrocode} %\end{macro} % %\begin{macro}{\DTMlsorbianoldmonthname} % Lower Sorbian (old) month names. % \begin{macrocode} \newcommand*{\DTMlsorbianoldmonthname}[1]{% \ifcase#1 \or wjelikego rožka% \or małego rožka% \or nalětnika% \or jatšownika% \or rožownika% \or smažnika% \or pražnika% \or žnjeńca% \or požnjeńca% \or winowca% \or nazymnika% \or godownika% \fi } % \end{macrocode} %\end{macro} % %\begin{macro}{\DTMlsorbianoldMonthname} % As above but capitalize. % \begin{macrocode} \newcommand*{\DTMlsorbianoldMonthname}[1]{% \ifcase#1 \or Wjelikego rožka% \or Małego rožka% \or Nalětnika% \or Jatšownika% \or Rožownika% \or Smažnika% \or Pražnika% \or Žnjeńca% \or Požnjeńca% \or Winowca% \or Nazymnika% \or Godownika% \fi } % \end{macrocode} %\end{macro} % %If abbreviated dates are supported, short month names should be %likewise provided. % %\iffalse % \begin{macrocode} % % \end{macrocode} %\fi %\iffalse % \begin{macrocode} %<*datetime2-lsorbian-ascii.ldf> % \end{macrocode} %\fi %\subsection{ASCII} %This file contains the settings that use \LaTeX\ commands for %non-ASCII characters. This should be input if neither XeLaTeX nor %LuaLaTeX are used. Even if the user has loaded \sty{inputenc} with %"utf8", this file should still be used not the %\texttt{datetime2-lsorbian-utf8.ldf} file as the non-ASCII %characters are made active in that situation and would need %protecting against expansion. %\changes{1.0}{2015-03-30}{Initial release} % Identify module % \begin{macrocode} \ProvidesDateTimeModule{lsorbian-ascii}[2018/05/18 v1.1] % \end{macrocode} % %If abbreviated dates are supported, short month names should be %likewise provided. %\begin{macro}{\DTMlsorbianordinal} % \begin{macrocode} \newcommand*{\DTMlsorbianordinal}[1]{% \number#1.% } % \end{macrocode} %\end{macro} % %\begin{macro}{\DTMlsorbiannewmonthname} % Lower Sorbian month names. % \begin{macrocode} \newcommand*{\DTMlsorbiannewmonthname}[1]{% \ifcase#1 \or januara% \or februara% \or m\protect\v erca% \or apryla% \or maja% \or junija% \or julija% \or awgusta% \or septembra% \or oktobra% \or nowembra% \or decembra% \fi } % \end{macrocode} %\end{macro} % %\begin{macro}{\DTMlsorbiannewMonthname} % As above but capitalize. % \begin{macrocode} \newcommand*{\DTMlsorbiannewMonthname}[1]{% \ifcase#1 \or Januara% \or Februara% \or M\protect\v erca% \or Apryla% \or Maja% \or Junija% \or Julija% \or Awgusta% \or Septembra% \or Oktobra% \or Nowembra% \or Decembra% \fi } % \end{macrocode} %\end{macro} % %\begin{macro}{\DTMlsorbianoldmonthname} % Lower Sorbian (old) month names. % \begin{macrocode} \newcommand*{\DTMlsorbianoldmonthname}[1]{% \ifcase#1 \or wjelikego ro\protect\v zka% \or ma\protect\l ego ro\protect\v zka% \or nal\protect\v etnika% \or jat\protect\v sownika% \or ro\protect\v zownika% \or sma\protect\v znika% \or pra\protect\v znika% \or \protect\v znje\protect\'nca% \or po\protect\v znje\protec\'nca% \or winowca% \or nazymnika% \or godownika% \fi } % \end{macrocode} %\end{macro} % %\begin{macro}{\DTMlsorbianoldMonthname} % As above but capitalize. % \begin{macrocode} \newcommand*{\DTMlsorbianoldMonthname}[1]{% \ifcase#1 \or Wjelikego ro\protect\v zka% \or Ma\protect\l ego ro\protect\v zka% \or Nal\protect\v etnika% \or Jat\protect\v sownika% \or Ro\protect\v zownika% \or Sma\protect\v znika% \or Pra\protect\v znika% \or \protect\v Znje\protect\'nca% \or Po\protect\v znje\protec\'nca% \or Winowca% \or Nazymnika% \or Godownika% \fi } % \end{macrocode} %\end{macro} % %\iffalse % \begin{macrocode} % % \end{macrocode} %\fi % %\subsection{Main Lower Sorbian Module (\texttt{datetime2-lsorbian.ldf})} %\changes{1.0}{2015-03-30}{Initial release} % %\iffalse % \begin{macrocode} %<*datetime2-lsorbian.ldf> % \end{macrocode} %\fi % % Identify Module % \begin{macrocode} \ProvidesDateTimeModule{lsorbian}[2018/05/18 v1.1] % \end{macrocode} % Need to find out if XeTeX or LuaTeX are being used. % \begin{macrocode} \RequirePackage{ifxetex,ifluatex} % \end{macrocode} % XeTeX and LuaTeX natively support UTF-8, so load % \texttt{lsorbian-utf8} if either of those engines are used % otherwise load \texttt{lsorbian-ascii}. % \begin{macrocode} \ifxetex \RequireDateTimeModule{lsorbian-utf8} \else \ifluatex \RequireDateTimeModule{lsorbian-utf8} \else \RequireDateTimeModule{lsorbian-ascii} \fi \fi % \end{macrocode} % % Define the \texttt{lsorbian} style. % The time style is the same as the "default" style % provided by \sty{datetime2}. This may need correcting. For % example, if a 12 hour style similar to the "englishampm" (from the % "english-base" module) is required. % % Allow the user a way of configuring the "lsorbian" and % "lsorbian-numeric" styles. This doesn't use the package wide % separators such as % \cs{dtm@datetimesep} in case other date formats are also required. %\begin{macro}{\DTMlsorbiandaymonthsep} % The separator between the day and month for the text format. % \begin{macrocode} \newcommand*{\DTMlsorbiandaymonthsep}{% \DTMtexorpdfstring{\protect~}{\space}% } % \end{macrocode} %\end{macro} % %\begin{macro}{\DTMlsorbianmonthyearsep} % The separator between the month and year for the text format. % \begin{macrocode} \newcommand*{\DTMlsorbianmonthyearsep}{\space} % \end{macrocode} %\end{macro} % %\begin{macro}{\DTMlsorbiandatetimesep} % The separator between the date and time blocks in the full format % (either text or numeric). % \begin{macrocode} \newcommand*{\DTMlsorbiandatetimesep}{\space} % \end{macrocode} %\end{macro} % %\begin{macro}{\DTMlsorbiantimezonesep} % The separator between the time and zone blocks in the full format % (either text or numeric). % \begin{macrocode} \newcommand*{\DTMlsorbiantimezonesep}{\space} % \end{macrocode} %\end{macro} % %\begin{macro}{\DTMlsorbiandatesep} % The separator for the numeric date format. % \begin{macrocode} \newcommand*{\DTMlsorbiandatesep}{/} % \end{macrocode} %\end{macro} % %\begin{macro}{\DTMlsorbiantimesep} % The separator for the numeric time format. % \begin{macrocode} \newcommand*{\DTMlsorbiantimesep}{:} % \end{macrocode} %\end{macro} % %Provide keys that can be used in \cs{DTMlangsetup} to set these %separators. % \begin{macrocode} \DTMdefkey{lsorbian}{daymonthsep}{\renewcommand*{\DTMlsorbiandaymonthsep}{#1}} \DTMdefkey{lsorbian}{monthyearsep}{\renewcommand*{\DTMlsorbianmonthyearsep}{#1}} \DTMdefkey{lsorbian}{datetimesep}{\renewcommand*{\DTMlsorbiandatetimesep}{#1}} \DTMdefkey{lsorbian}{timezonesep}{\renewcommand*{\DTMlsorbiantimezonesep}{#1}} \DTMdefkey{lsorbian}{datesep}{\renewcommand*{\DTMlsorbiandatesep}{#1}} \DTMdefkey{lsorbian}{timesep}{\renewcommand*{\DTMlsorbiantimesep}{#1}} % \end{macrocode} % %\begin{macro}{\DTMlsorbianmonthname} % Provide a way to switch between old and new month names % \begin{macrocode} \newcommand*\DTMlsorbianmonthname{\DTMlsorbiannewmonthname} % \end{macrocode} %\end{macro} %\begin{macro}{\DTMlsorbianMonthname} % Provide a way to switch between old and new month names % \begin{macrocode} \newcommand*\DTMlsorbianMonthname{\DTMlsorbiannewMonthname} % \end{macrocode} %\end{macro} % Define a key to easily switch: % \begin{macrocode} \DTMdefchoicekey{lsorbian}{style}[\val\nr]{old,new}{% \ifcase\nr\relax \renewcommand*\DTMlsorbianmonthname{\DTMlsorbianoldmonthname}% \renewcommand*\DTMlsorbianMonthname{\DTMlsorbianoldMonthname}% \or \renewcommand*\DTMlsorbianmonthname{\DTMlsorbiannewmonthname}% \renewcommand*\DTMlsorbianMonthname{\DTMlsorbiannewMonthname}% \fi } % \end{macrocode} % % TODO: provide a boolean key to switch between full and abbreviated % formats if appropriate. (I don't know how the date should be % abbreviated.) % % Define a boolean key that determines if the time zone mappings % should be used. % \begin{macrocode} \DTMdefboolkey{lsorbian}{mapzone}[true]{} % \end{macrocode} % The default is to use mappings. % \begin{macrocode} \DTMsetbool{lsorbian}{mapzone}{true} % \end{macrocode} % % Define a boolean key that determines if the day of month should be % displayed. % \begin{macrocode} \DTMdefboolkey{lsorbian}{showdayofmonth}[true]{} % \end{macrocode} % The default is to show the day of month. % \begin{macrocode} \DTMsetbool{lsorbian}{showdayofmonth}{true} % \end{macrocode} % % Define a boolean key that determines if the year should be % displayed. % \begin{macrocode} \DTMdefboolkey{lsorbian}{showyear}[true]{} % \end{macrocode} % The default is to show the year. % \begin{macrocode} \DTMsetbool{lsorbian}{showyear}{true} % \end{macrocode} % % Define the "lsorbian" style. (TODO: implement day of week?) % \begin{macrocode} \DTMnewstyle {lsorbian}% label {% date style \renewcommand*\DTMdisplaydate[4]{% \DTMifbool{lsorbian}{showdayofmonth} {\DTMlsorbianordinal{##3}\DTMlsorbiandaymonthsep}% {}% \DTMlsorbianmonthname{##2}% \DTMifbool{lsorbian}{showyear}% {% \DTMlsorbianmonthyearsep \number##1 }% {}% }% \renewcommand*\DTMDisplaydate[4]{% \DTMifbool{lsorbian}{showdayofmonth} {% \DTMlsorbianordinal{##3}\DTMlsorbiandaymonthsep \DTMlsorbianmonthname{##2}% }% {% \DTMlsorbianMonthname{##2}% }% \DTMifbool{lsorbian}{showyear}% {% \DTMlsorbianmonthyearsep \number##1 }% {}% }% }% {% time style (use default) \DTMsettimestyle{default}% }% {% zone style \DTMresetzones \DTMlsorbianzonemaps \renewcommand*{\DTMdisplayzone}[2]{% \DTMifbool{lsorbian}{mapzone}% {\DTMusezonemapordefault{##1}{##2}}% {% \ifnum##1<0\else+\fi\DTMtwodigits{##1}% \ifDTMshowzoneminutes\DTMlsorbiantimesep\DTMtwodigits{##2}\fi }% }% }% {% full style \renewcommand*{\DTMdisplay}[9]{% \ifDTMshowdate \DTMdisplaydate{##1}{##2}{##3}{##4}% \DTMlsorbiandatetimesep \fi \DTMdisplaytime{##5}{##6}{##7}% \ifDTMshowzone \DTMlsorbiantimezonesep \DTMdisplayzone{##8}{##9}% \fi }% \renewcommand*{\DTMDisplay}[9]{% \ifDTMshowdate \DTMDisplaydate{##1}{##2}{##3}{##4}% \DTMlsorbiandatetimesep \fi \DTMdisplaytime{##5}{##6}{##7}% \ifDTMshowzone \DTMlsorbiantimezonesep \DTMdisplayzone{##8}{##9}% \fi }% }% % \end{macrocode} % % Define numeric style. % \begin{macrocode} \DTMnewstyle {lsorbian-numeric}% label {% date style \renewcommand*\DTMdisplaydate[4]{% \DTMifbool{lsorbian}{showdayofmonth}% {% \number##3 % space intended \DTMlsorbiandatesep }% {}% \number##2 % space intended \DTMifbool{lsorbian}{showyear}% {% \DTMlsorbiandatesep \number##1 % space intended }% {}% }% \renewcommand*{\DTMDisplaydate}{\DTMdisplaydate}% }% {% time style \renewcommand*\DTMdisplaytime[3]{% \number##1 \DTMlsorbiantimesep\DTMtwodigits{##2}% \ifDTMshowseconds\DTMlsorbiantimesep\DTMtwodigits{##3}\fi }% }% {% zone style \DTMresetzones \DTMlsorbianzonemaps \renewcommand*{\DTMdisplayzone}[2]{% \DTMifbool{lsorbian}{mapzone}% {\DTMusezonemapordefault{##1}{##2}}% {% \ifnum##1<0\else+\fi\DTMtwodigits{##1}% \ifDTMshowzoneminutes\DTMlsorbiantimesep\DTMtwodigits{##2}\fi }% }% }% {% full style \renewcommand*{\DTMdisplay}[9]{% \ifDTMshowdate \DTMdisplaydate{##1}{##2}{##3}{##4}% \DTMlsorbiandatetimesep \fi \DTMdisplaytime{##5}{##6}{##7}% \ifDTMshowzone \DTMlsorbiantimezonesep \DTMdisplayzone{##8}{##9}% \fi }% \renewcommand*{\DTMDisplay}{\DTMdisplay}% } % \end{macrocode} % %\begin{macro}{\DTMlsorbianzonemaps} % The time zone mappings are set through this command, which can be % redefined if extra mappings are required or mappings need to be % removed. % \begin{macrocode} \newcommand*{\DTMlsorbianzonemaps}{% \DTMdefzonemap{01}{00}{CET}% \DTMdefzonemap{02}{00}{CEST}% } % \end{macrocode} %\end{macro} % Switch style according to the \opt{useregional} setting. % \begin{macrocode} \DTMifcaseregional {}% do nothing {\DTMsetstyle{lsorbian}} {\DTMsetstyle{lsorbian-numeric}} % \end{macrocode} % % Redefine \cs{datelsorbian} (or \cs{date}\meta{dialect}) to prevent % \sty{babel} from resetting \cs{today}. (For this to work, % \sty{babel} must already have been loaded if it's required.) %\changes{1.1}{2018-05-18}{removed spurious space} % \begin{macrocode} \ifcsundef{date\CurrentTrackedDialect} {% \ifundef\datelsorbian {% do nothing }% {% \def\datelsorbian{% \DTMifcaseregional {}% do nothing {\DTMsetstyle{lsorbian}}% {\DTMsetstyle{lsorbian-numeric}}% }% }% }% {% \csdef{date\CurrentTrackedDialect}{% \DTMifcaseregional {}% do nothing {\DTMsetstyle{lsorbian}}% {\DTMsetstyle{lsorbian-numeric}}% }% }% % \end{macrocode} %\iffalse % \begin{macrocode} % % \end{macrocode} %\fi %\Finale \endinput