summaryrefslogtreecommitdiff
path: root/Master/texmf-dist/tex/latex/tuda-ci/tudaletter.cls
diff options
context:
space:
mode:
authorKarl Berry <karl@freefriends.org>2020-01-29 22:39:53 +0000
committerKarl Berry <karl@freefriends.org>2020-01-29 22:39:53 +0000
commit5d770d459844c986a0647f13e2167e9e06a14909 (patch)
tree62b6302efe031101d76324e064bd9bcb586824db /Master/texmf-dist/tex/latex/tuda-ci/tudaletter.cls
parent917f764bece8b19f3a434616b9826d23962bcb2d (diff)
tuda-ci (29jan20)
git-svn-id: svn://tug.org/texlive/trunk@53598 c570f23f-e606-0410-a88d-b1316a301751
Diffstat (limited to 'Master/texmf-dist/tex/latex/tuda-ci/tudaletter.cls')
-rw-r--r--Master/texmf-dist/tex/latex/tuda-ci/tudaletter.cls20
1 files changed, 15 insertions, 5 deletions
diff --git a/Master/texmf-dist/tex/latex/tuda-ci/tudaletter.cls b/Master/texmf-dist/tex/latex/tuda-ci/tudaletter.cls
index 1686cd9fc50..0a53b10e1b8 100644
--- a/Master/texmf-dist/tex/latex/tuda-ci/tudaletter.cls
+++ b/Master/texmf-dist/tex/latex/tuda-ci/tudaletter.cls
@@ -1,4 +1,4 @@
-%% This is file `tudaletter.cls' version 2.05 (2019/12/18),
+%% This is file `tudaletter.cls' version 2.07 (2020/01/28),
%% it is part of
%% TUDa-CI -- Corporate Design for TU Darmstadt
%% ----------------------------------------------------------------------------
@@ -26,8 +26,8 @@
%%
%% ============================================================================
%%
-\def\fileversion{2.05}
-\def\filedate{2019/12/18}
+\def\fileversion{2.07}
+\def\filedate{2020/01/28}
\NeedsTeXFormat{LaTeX2e}
\RequirePackage{expl3}
\ProvidesExplClass{tudaletter}
@@ -429,9 +429,19 @@
}
}
\cs_new:Nn \TUDa_write_xmp_line:nn {
- \cs_if_exist:cTF {\tl_mixed_case:n {#1}} {
+ %Fallback test for older kernels
+ \cs_if_exist:NTF \str_uppercase:f {
+ \tl_set:Nx \l_tmpa_tl {
+ \str_uppercase:f {\tl_head:n {#1}}
+ \str_lowercase:f { \tl_tail:n {#1}}
+ }
+ } {
+ %may be removed in some time
+ \tl_set:Nx \l_tmpa_tl {\tl_mixed_case:n {#1}}
+ }
+ \cs_if_exist:cTF {\l_tmpa_tl}{
\iow_now:Nx \TUDa@xmpdata_stream {
- \c_backslash_str \tl_mixed_case:n {#1} {#2}\iow_newline:
+ \c_backslash_str \l_tmpa_tl {\exp_not:n {#2}}
}
}{
\msg_error:nnn {TUDapub} {unknown-metadata} {#1}