%\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) 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}
%</driver>
%\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}
%</datetime2-lsorbian-utf8.ldf>
%    \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}
%</datetime2-lsorbian-ascii.ldf>
%    \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}
%</datetime2-lsorbian.ldf>
%    \end{macrocode}
%\fi
%\Finale
\endinput
