summaryrefslogtreecommitdiff
path: root/macros/latex/contrib/datetime2-contrib/datetime2-usorbian/datetime2-usorbian.dtx
diff options
context:
space:
mode:
Diffstat (limited to 'macros/latex/contrib/datetime2-contrib/datetime2-usorbian/datetime2-usorbian.dtx')
-rw-r--r--macros/latex/contrib/datetime2-contrib/datetime2-usorbian/datetime2-usorbian.dtx792
1 files changed, 792 insertions, 0 deletions
diff --git a/macros/latex/contrib/datetime2-contrib/datetime2-usorbian/datetime2-usorbian.dtx b/macros/latex/contrib/datetime2-contrib/datetime2-usorbian/datetime2-usorbian.dtx
new file mode 100644
index 0000000000..8f31498f59
--- /dev/null
+++ b/macros/latex/contrib/datetime2-contrib/datetime2-usorbian/datetime2-usorbian.dtx
@@ -0,0 +1,792 @@
+%\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 \~}
+%</package>
+%\fi
+% \iffalse
+% Doc-Source file to use with LaTeX2e
+% Copyright (C) 2015 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 Upper 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-usorbian.dtx}
+\end{document}
+%</driver>
+%\fi
+%
+%\MakeShortVerb{"}
+%
+%\title{Upper Sorbian Module for datetime2 Package}
+%\author{Nicola L. C. Talbot (inactive)}
+%\date{2015-04-01 (v1.0)}
+%\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 Upper 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-usorbian}'s \cs{today}.
+%
+%I don't know if these settings are correct as I can't speak Upper Sorbian.
+%In particular, I don't know if the "usorbian" 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-usorbian.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-usorbian-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-04-01}{Initial release}
+% Identify module
+% \begin{macrocode}
+\ProvidesDateTimeModule{usorbian-utf8}[2015/04/01 v1.0]
+% \end{macrocode}
+%\begin{macro}{\DTMusorbianordinal}
+% \begin{macrocode}
+\newcommand*{\DTMusorbianordinal}[1]{%
+ \number#1.%
+}
+% \end{macrocode}
+%\end{macro}
+%
+%
+%\begin{macro}{\DTMusorbiannewmonthname}
+% Upper Sorbian month names.
+% \begin{macrocode}
+\newcommand*{\DTMusorbiannewmonthname}[1]{%
+ \ifcase#1
+ \or
+ januara%
+ \or
+ februara%
+ \or
+ měrca%
+ \or
+ apryla%
+ \or
+ meje%
+ \or
+ junija%
+ \or
+ julija%
+ \or
+ awgusta%
+ \or
+ septembra%
+ \or
+ oktobra%
+ \or
+ nowembra%
+ \or
+ decembra%
+ \fi
+}
+% \end{macrocode}
+%\end{macro}
+%
+%\begin{macro}{\DTMusorbiannewMonthname}
+% As above but capitalize.
+% \begin{macrocode}
+\newcommand*{\DTMusorbiannewMonthname}[1]{%
+ \ifcase#1
+ \or
+ Januara%
+ \or
+ Februara%
+ \or
+ Měrca%
+ \or
+ Apryla%
+ \or
+ Meje%
+ \or
+ Junija%
+ \or
+ Julija%
+ \or
+ Awgusta%
+ \or
+ Septembra%
+ \or
+ Oktobra%
+ \or
+ Nowembra%
+ \or
+ Decembra%
+ \fi
+}
+% \end{macrocode}
+%\end{macro}
+%
+%\begin{macro}{\DTMusorbianoldmonthname}
+% Upper Sorbian (old) month names.
+% \begin{macrocode}
+\newcommand*{\DTMusorbianoldmonthname}[1]{%
+ \ifcase#1
+ \or
+ wulkeho róžka%
+ \or
+ małeho róžka%
+ \or
+ nalětnika%
+ \or
+ jutrownika%
+ \or
+ róžownika%
+ \or
+ smažnika%
+ \or
+ pražnika%
+ \or
+ žnjenca%
+ \or
+ požnjenca%
+ \or
+ winowca%
+ \or
+ nazymnika%
+ \or
+ hodownika%
+ \fi
+}
+% \end{macrocode}
+%\end{macro}
+%
+%\begin{macro}{\DTMusorbianoldMonthname}
+% As above but capitalize.
+% \begin{macrocode}
+\newcommand*{\DTMusorbianoldMonthname}[1]{%
+ \ifcase#1
+ \or
+ Wulkeho róžka%
+ \or
+ Małeho róžka%
+ \or
+ Nalětnika%
+ \or
+ Jutrownika%
+ \or
+ Róžownika%
+ \or
+ Smažnika%
+ \or
+ Pražnika%
+ \or
+ Žnjenca%
+ \or
+ Požnjenca%
+ \or
+ Winowca%
+ \or
+ Nazymnika%
+ \or
+ Hodownika%
+ \fi
+}
+% \end{macrocode}
+%\end{macro}
+%
+%If abbreviated dates are supported, short month names should be
+%likewise provided.
+%
+%\iffalse
+% \begin{macrocode}
+%</datetime2-usorbian-utf8.ldf>
+% \end{macrocode}
+%\fi
+%\iffalse
+% \begin{macrocode}
+%<*datetime2-usorbian-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-usorbian-utf8.ldf} file as the non-ASCII
+%characters are made active in that situation and would need
+%protecting against expansion.
+%\changes{1.0}{2015-04-01}{Initial release}
+% Identify module
+% \begin{macrocode}
+\ProvidesDateTimeModule{usorbian-ascii}[2015/04/01 v1.0]
+% \end{macrocode}
+%
+%If abbreviated dates are supported, short month names should be
+%likewise provided.
+%\begin{macro}{\DTMusorbianordinal}
+% \begin{macrocode}
+\newcommand*{\DTMusorbianordinal}[1]{%
+ \number#1.%
+}
+% \end{macrocode}
+%\end{macro}
+%
+%\begin{macro}{\DTMusorbiannewmonthname}
+% Upper Sorbian month names.
+% \begin{macrocode}
+\newcommand*{\DTMusorbiannewmonthname}[1]{%
+ \ifcase#1
+ \or
+ januara%
+ \or
+ februara%
+ \or
+ m\protect\v erca%
+ \or
+ apryla%
+ \or
+ meje%
+ \or
+ junija%
+ \or
+ julija%
+ \or
+ awgusta%
+ \or
+ septembra%
+ \or
+ oktobra%
+ \or
+ nowembra%
+ \or
+ decembra%
+ \fi
+}
+% \end{macrocode}
+%\end{macro}
+%
+%\begin{macro}{\DTMusorbiannewMonthname}
+% As above but capitalize.
+% \begin{macrocode}
+\newcommand*{\DTMusorbiannewMonthname}[1]{%
+ \ifcase#1
+ \or
+ Januara%
+ \or
+ Februara%
+ \or
+ M\protect\v erca%
+ \or
+ Apryla%
+ \or
+ Meje%
+ \or
+ Junija%
+ \or
+ Julija%
+ \or
+ Awgusta%
+ \or
+ Septembra%
+ \or
+ Oktobra%
+ \or
+ Nowembra%
+ \or
+ Decembra%
+ \fi
+}
+% \end{macrocode}
+%\end{macro}
+%
+%\begin{macro}{\DTMusorbianoldmonthname}
+% Upper Sorbian (old) month names.
+% \begin{macrocode}
+\newcommand*{\DTMusorbianoldmonthname}[1]{%
+ \ifcase#1
+ \or
+ wulkeho r\protect\'o\protect\v zka%
+ \or
+ ma\protect\l eho r\protect\'o\protect\v zka%
+ \or
+ nal\protect\v etnika%
+ \or
+ jutrownika%
+ \or
+ r\protect\'o\protect\v zownika%
+ \or
+ sma\protect\v znika%
+ \or
+ pra\protect\v znika%
+ \or
+ \protect\v znjenca%
+ \or
+ po\protect\v znjenca%
+ \or
+ winowca%
+ \or
+ nazymnika%
+ \or
+ hodownika%
+ \fi
+}
+% \end{macrocode}
+%\end{macro}
+%
+%\begin{macro}{\DTMusorbianoldMonthname}
+% As above but capitalize.
+% \begin{macrocode}
+\newcommand*{\DTMusorbianoldMonthname}[1]{%
+ \ifcase#1
+ \or
+ Wulkeho r\protect\'o\protect\v zka%
+ \or
+ Ma\protect\l eho r\protect\'o\protect\v zka%
+ \or
+ Nal\protect\v etnika%
+ \or
+ Jutrownika%
+ \or
+ R\protect\'o\protect\v zownika%
+ \or
+ Sma\protect\v znika%
+ \or
+ Pra\protect\v znika%
+ \or
+ \protect\v Znjenca%
+ \or
+ Po\protect\v znjenca%
+ \or
+ Winowca%
+ \or
+ Nazymnika%
+ \or
+ Hodownika%
+ \fi
+}
+% \end{macrocode}
+%\end{macro}
+%
+%\iffalse
+% \begin{macrocode}
+%</datetime2-usorbian-ascii.ldf>
+% \end{macrocode}
+%\fi
+%
+%\subsection{Main Upper Sorbian Module (\texttt{datetime2-usorbian.ldf})}
+%\changes{1.0}{2015-04-01}{Initial release}
+%
+%\iffalse
+% \begin{macrocode}
+%<*datetime2-usorbian.ldf>
+% \end{macrocode}
+%\fi
+%
+% Identify Module
+% \begin{macrocode}
+\ProvidesDateTimeModule{usorbian}[2015/04/01 v1.0]
+% \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{usorbian-utf8} if either of those engines are used
+% otherwise load \texttt{usorbian-ascii}.
+% \begin{macrocode}
+\ifxetex
+ \RequireDateTimeModule{usorbian-utf8}
+\else
+ \ifluatex
+ \RequireDateTimeModule{usorbian-utf8}
+ \else
+ \RequireDateTimeModule{usorbian-ascii}
+ \fi
+\fi
+% \end{macrocode}
+%
+% Define the \texttt{usorbian} 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 "usorbian" and
+% "usorbian-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}{\DTMusorbiandaymonthsep}
+% The separator between the day and month for the text format.
+% \begin{macrocode}
+\newcommand*{\DTMusorbiandaymonthsep}{%
+ \DTMtexorpdfstring{\protect~}{\space}%
+}
+% \end{macrocode}
+%\end{macro}
+%
+%\begin{macro}{\DTMusorbianmonthyearsep}
+% The separator between the month and year for the text format.
+% \begin{macrocode}
+\newcommand*{\DTMusorbianmonthyearsep}{\space}
+% \end{macrocode}
+%\end{macro}
+%
+%\begin{macro}{\DTMusorbiandatetimesep}
+% The separator between the date and time blocks in the full format
+% (either text or numeric).
+% \begin{macrocode}
+\newcommand*{\DTMusorbiandatetimesep}{\space}
+% \end{macrocode}
+%\end{macro}
+%
+%\begin{macro}{\DTMusorbiantimezonesep}
+% The separator between the time and zone blocks in the full format
+% (either text or numeric).
+% \begin{macrocode}
+\newcommand*{\DTMusorbiantimezonesep}{\space}
+% \end{macrocode}
+%\end{macro}
+%
+%\begin{macro}{\DTMusorbiandatesep}
+% The separator for the numeric date format.
+% \begin{macrocode}
+\newcommand*{\DTMusorbiandatesep}{/}
+% \end{macrocode}
+%\end{macro}
+%
+%\begin{macro}{\DTMusorbiantimesep}
+% The separator for the numeric time format.
+% \begin{macrocode}
+\newcommand*{\DTMusorbiantimesep}{:}
+% \end{macrocode}
+%\end{macro}
+%
+%Provide keys that can be used in \cs{DTMlangsetup} to set these
+%separators.
+% \begin{macrocode}
+\DTMdefkey{usorbian}{daymonthsep}{\renewcommand*{\DTMusorbiandaymonthsep}{#1}}
+\DTMdefkey{usorbian}{monthyearsep}{\renewcommand*{\DTMusorbianmonthyearsep}{#1}}
+\DTMdefkey{usorbian}{datetimesep}{\renewcommand*{\DTMusorbiandatetimesep}{#1}}
+\DTMdefkey{usorbian}{timezonesep}{\renewcommand*{\DTMusorbiantimezonesep}{#1}}
+\DTMdefkey{usorbian}{datesep}{\renewcommand*{\DTMusorbiandatesep}{#1}}
+\DTMdefkey{usorbian}{timesep}{\renewcommand*{\DTMusorbiantimesep}{#1}}
+% \end{macrocode}
+%
+%\begin{macro}{\DTMusorbianmonthname}
+% Provide a way to switch between old and new month names
+% \begin{macrocode}
+\newcommand*\DTMusorbianmonthname{\DTMusorbiannewmonthname}
+% \end{macrocode}
+%\end{macro}
+%\begin{macro}{\DTMusorbianMonthname}
+% Provide a way to switch between old and new month names
+% \begin{macrocode}
+\newcommand*\DTMusorbianMonthname{\DTMusorbiannewMonthname}
+% \end{macrocode}
+%\end{macro}
+% Define a key to easily switch:
+% \begin{macrocode}
+\DTMdefchoicekey{usorbian}{style}[\val\nr]{old,new}{%
+ \ifcase\nr\relax
+ \renewcommand*\DTMusorbianmonthname{\DTMusorbianoldmonthname}%
+ \renewcommand*\DTMusorbianMonthname{\DTMusorbianoldMonthname}%
+ \or
+ \renewcommand*\DTMusorbianmonthname{\DTMusorbiannewmonthname}%
+ \renewcommand*\DTMusorbianMonthname{\DTMusorbiannewMonthname}%
+ \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{usorbian}{mapzone}[true]{}
+% \end{macrocode}
+% The default is to use mappings.
+% \begin{macrocode}
+\DTMsetbool{usorbian}{mapzone}{true}
+% \end{macrocode}
+%
+% Define a boolean key that determines if the day of month should be
+% displayed.
+% \begin{macrocode}
+\DTMdefboolkey{usorbian}{showdayofmonth}[true]{}
+% \end{macrocode}
+% The default is to show the day of month.
+% \begin{macrocode}
+\DTMsetbool{usorbian}{showdayofmonth}{true}
+% \end{macrocode}
+%
+% Define a boolean key that determines if the year should be
+% displayed.
+% \begin{macrocode}
+\DTMdefboolkey{usorbian}{showyear}[true]{}
+% \end{macrocode}
+% The default is to show the year.
+% \begin{macrocode}
+\DTMsetbool{usorbian}{showyear}{true}
+% \end{macrocode}
+%
+% Define the "usorbian" style. (TODO: implement day of week?)
+% \begin{macrocode}
+\DTMnewstyle
+ {usorbian}% label
+ {% date style
+ \renewcommand*\DTMdisplaydate[4]{%
+ \DTMifbool{usorbian}{showdayofmonth}
+ {\DTMusorbianordinal{##3}\DTMusorbiandaymonthsep}%
+ {}%
+ \DTMusorbianmonthname{##2}%
+ \DTMifbool{usorbian}{showyear}%
+ {%
+ \DTMusorbianmonthyearsep
+ \number##1
+ }%
+ {}%
+ }%
+ \renewcommand*\DTMDisplaydate[4]{%
+ \DTMifbool{usorbian}{showdayofmonth}
+ {%
+ \DTMusorbianordinal{##3}\DTMusorbiandaymonthsep
+ \DTMusorbianmonthname{##2}%
+ }%
+ {%
+ \DTMusorbianMonthname{##2}%
+ }%
+ \DTMifbool{usorbian}{showyear}%
+ {%
+ \DTMusorbianmonthyearsep
+ \number##1
+ }%
+ {}%
+ }%
+ }%
+ {% time style (use default)
+ \DTMsettimestyle{default}%
+ }%
+ {% zone style
+ \DTMresetzones
+ \DTMusorbianzonemaps
+ \renewcommand*{\DTMdisplayzone}[2]{%
+ \DTMifbool{usorbian}{mapzone}%
+ {\DTMusezonemapordefault{##1}{##2}}%
+ {%
+ \ifnum##1<0\else+\fi\DTMtwodigits{##1}%
+ \ifDTMshowzoneminutes\DTMusorbiantimesep\DTMtwodigits{##2}\fi
+ }%
+ }%
+ }%
+ {% full style
+ \renewcommand*{\DTMdisplay}[9]{%
+ \ifDTMshowdate
+ \DTMdisplaydate{##1}{##2}{##3}{##4}%
+ \DTMusorbiandatetimesep
+ \fi
+ \DTMdisplaytime{##5}{##6}{##7}%
+ \ifDTMshowzone
+ \DTMusorbiantimezonesep
+ \DTMdisplayzone{##8}{##9}%
+ \fi
+ }%
+ \renewcommand*{\DTMDisplay}[9]{%
+ \ifDTMshowdate
+ \DTMDisplaydate{##1}{##2}{##3}{##4}%
+ \DTMusorbiandatetimesep
+ \fi
+ \DTMdisplaytime{##5}{##6}{##7}%
+ \ifDTMshowzone
+ \DTMusorbiantimezonesep
+ \DTMdisplayzone{##8}{##9}%
+ \fi
+ }%
+ }%
+% \end{macrocode}
+%
+% Define numeric style.
+% \begin{macrocode}
+\DTMnewstyle
+ {usorbian-numeric}% label
+ {% date style
+ \renewcommand*\DTMdisplaydate[4]{%
+ \DTMifbool{usorbian}{showdayofmonth}%
+ {%
+ \number##3 % space intended
+ \DTMusorbiandatesep
+ }%
+ {}%
+ \number##2 % space intended
+ \DTMifbool{usorbian}{showyear}%
+ {%
+ \DTMusorbiandatesep
+ \number##1 % space intended
+ }%
+ {}%
+ }%
+ \renewcommand*{\DTMDisplaydate}{\DTMdisplaydate}%
+ }%
+ {% time style
+ \renewcommand*\DTMdisplaytime[3]{%
+ \number##1
+ \DTMusorbiantimesep\DTMtwodigits{##2}%
+ \ifDTMshowseconds\DTMusorbiantimesep\DTMtwodigits{##3}\fi
+ }%
+ }%
+ {% zone style
+ \DTMresetzones
+ \DTMusorbianzonemaps
+ \renewcommand*{\DTMdisplayzone}[2]{%
+ \DTMifbool{usorbian}{mapzone}%
+ {\DTMusezonemapordefault{##1}{##2}}%
+ {%
+ \ifnum##1<0\else+\fi\DTMtwodigits{##1}%
+ \ifDTMshowzoneminutes\DTMusorbiantimesep\DTMtwodigits{##2}\fi
+ }%
+ }%
+ }%
+ {% full style
+ \renewcommand*{\DTMdisplay}[9]{%
+ \ifDTMshowdate
+ \DTMdisplaydate{##1}{##2}{##3}{##4}%
+ \DTMusorbiandatetimesep
+ \fi
+ \DTMdisplaytime{##5}{##6}{##7}%
+ \ifDTMshowzone
+ \DTMusorbiantimezonesep
+ \DTMdisplayzone{##8}{##9}%
+ \fi
+ }%
+ \renewcommand*{\DTMDisplay}{\DTMdisplay}%
+ }
+% \end{macrocode}
+%
+%\begin{macro}{\DTMusorbianzonemaps}
+% 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*{\DTMusorbianzonemaps}{%
+ \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{usorbian}}
+{\DTMsetstyle{usorbian-numeric}}
+% \end{macrocode}
+%
+% Redefine \cs{dateusorbian} (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.)
+% \begin{macrocode}
+\ifcsundef{date\CurrentTrackedDialect}
+{%
+ \ifundef\dateusorbian
+ {% do nothing
+ }%
+ {%
+ \def\dateusorbian{%
+ \DTMifcaseregional
+ {}% do nothing
+ {\DTMsetstyle{usorbian}}%
+ {\DTMsetstyle{usorbian-numeric}}%
+ }%
+ }%
+}%
+{%
+ \csdef{date\CurrentTrackedDialect}{%
+ \DTMifcaseregional
+ {}% do nothing
+ {\DTMsetstyle{usorbian}}%
+ {\DTMsetstyle{usorbian-numeric}}
+ }%
+}%
+% \end{macrocode}
+%\iffalse
+% \begin{macrocode}
+%</datetime2-usorbian.ldf>
+% \end{macrocode}
+%\fi
+%\Finale
+\endinput