[latex3-commits] [git/LaTeX3-latex3-babel] main: Attempt to deal with german and swissgerman. (0cd71a0)
Javier
email at dante.de
Fri Jun 24 17:51:44 CEST 2022
Repository : https://github.com/latex3/babel
On branch : main
Link : https://github.com/latex3/babel/commit/0cd71a09758c76d29a7f0cf3c0392d36b66e29d5
>---------------------------------------------------------------
commit 0cd71a09758c76d29a7f0cf3c0392d36b66e29d5
Author: Javier <email at localhost>
Date: Fri Jun 24 17:51:44 2022 +0200
Attempt to deal with german and swissgerman.
>---------------------------------------------------------------
0cd71a09758c76d29a7f0cf3c0392d36b66e29d5
README.md | 3 ++-
locale/de/babel-austrian.tex | 15 +++++++++++-
locale/de/babel-de-CH.ini | 10 ++++----
locale/de/babel-german.tex | 16 ++++++++++++-
...l-swissgerman.tex => babel-swisshighgerman.tex} | 0
locale/gsw/babel-swissgerman.tex | 27 ++++++++++++++++++++++
6 files changed, 63 insertions(+), 8 deletions(-)
diff --git a/README.md b/README.md
index c8d1751..1ba2dd6 100644
--- a/README.md
+++ b/README.md
@@ -1,4 +1,4 @@
-## Babel 3.76.2772
+## Babel 3.76.2778
*Development*.
@@ -55,6 +55,7 @@ respective authors.
* Date now defaults to 'persian' in a few locales: Persian,
Northern Luri, Mazanderani, Pashto.
* New calendars: coptic (ar-EG, cop), buddhist (th).
+ * Attempt to deal with german and swissgerman.
3.76 2022-06-06
* Calendar conversion with a new macro \babelcalendar: hebrew,
diff --git a/locale/de/babel-austrian.tex b/locale/de/babel-austrian.tex
index 33127d6..50238cf 100644
--- a/locale/de/babel-austrian.tex
+++ b/locale/de/babel-austrian.tex
@@ -7,6 +7,19 @@
{Just use babel as documented.}%
\stop
\fi
-\BabelBeforeIni{de-AT}{%
+\begingroup
+ \makeatletter
+ \gdef\BabelAustrianIniTag{de-AT}%
+ \ifx\bbl at inidata\@undefined
+ \def\bbl at elt#1#2#3#4{%
+ \ifnum\csname l@#1\endcsname=\l at austrian
+ \in@{1901}{#3}%
+ \ifin@\gdef\BabelAustrianIniTag{de-AT-1901}\fi
+ \def\bbl at elt##1##2##3#4{}%
+ \fi}%
+ \bbl at languages
+ \fi
+\endgroup
+\BabelBeforeIni{\BabelAustrianIniTag}{%
}
\endinput
\ No newline at end of file
diff --git a/locale/de/babel-de-CH.ini b/locale/de/babel-de-CH.ini
index cf39b6e..a450b04 100644
--- a/locale/de/babel-de-CH.ini
+++ b/locale/de/babel-de-CH.ini
@@ -11,11 +11,11 @@
[identification]
charset = utf8
-version = 1.5
-date = 2022-05-17
-name.local = Deutsch
-name.english = German
-name.babel = german-switzerland german-ch nswissgerman
+version = 1.6
+date = 2022-06-22
+name.local = Schweizer Hochdeutsch
+name.english = Swiss High German
+name.babel = german-switzerland german-ch swisshighgerman nswissgerman
name.polyglossia = german
tag.bcp47 = de-CH
language.tag.bcp47 = de
diff --git a/locale/de/babel-german.tex b/locale/de/babel-german.tex
index d25bf17..85f1403 100644
--- a/locale/de/babel-german.tex
+++ b/locale/de/babel-german.tex
@@ -7,6 +7,20 @@
{Just use babel as documented.}%
\stop
\fi
-\BabelBeforeIni{de}{%
+% Hay que verificar antes que es el ldf.
+\begingroup
+ \makeatletter
+ \gdef\BabelGermanIniTag{de}%
+ \ifx\bbl at inidata\@undefined
+ \def\bbl at elt#1#2#3#4{%
+ \ifnum\csname l@#1\endcsname=\l at german
+ \in@{1901}{#3}%
+ \ifin@\gdef\BabelGermanIniTag{de-1901}\fi
+ \def\bbl at elt##1##2##3#4{}%
+ \fi}%
+ \bbl at languages
+ \fi
+\endgroup
+\BabelBeforeIni{\BabelGermanIniTag}{%
}
\endinput
\ No newline at end of file
diff --git a/locale/de/babel-swissgerman.tex b/locale/de/babel-swisshighgerman.tex
similarity index 100%
rename from locale/de/babel-swissgerman.tex
rename to locale/de/babel-swisshighgerman.tex
diff --git a/locale/gsw/babel-swissgerman.tex b/locale/gsw/babel-swissgerman.tex
new file mode 100644
index 0000000..8ec1895
--- /dev/null
+++ b/locale/gsw/babel-swissgerman.tex
@@ -0,0 +1,27 @@
+% This file is part of babel. For further details see:
+% https://www.ctan.org/pkg/babel
+\ifx\BabelBeforeIni\undefined
+ \PackageError{babel}%
+ {This file is a component of babel and cannot\MessageBreak
+ be loaded directly. I'll stop immediately}%
+ {Just use babel as documented.}%
+ \stop
+\fi
+\begingroup
+ \makeatletter
+ \ifx\bbl at inidata\@undefined
+ \gdef\BabelSwissHighIniTag{de-CH}%
+ \def\bbl at elt#1#2#3#4{%
+ \ifnum\csname l@#1\endcsname=\l at swissgerman
+ \in@{1901}{#3}%
+ \ifin@\gdef\BabelSwissHighIniTag{de-CH-1901}\fi
+ \def\bbl at elt##1##2##3#4{}%
+ \fi}%
+ \bbl at languages
+ \else
+ \gdef\BabelSwissHighIniTag{gsw}%
+ \fi
+\endgroup
+\BabelBeforeIni{\BabelSwissHighIniTag}{%
+}
+\endinput
\ No newline at end of file
More information about the latex3-commits
mailing list.