[latex3-commits] [latex3/latex3] gh1232-titlecase-2: s/once/first/g (1e39affee)

[github at latex-project.org]

Repository : https://github.com/latex3/latex3
On branch  : gh1232-titlecase-2
Link       : https://github.com/latex3/latex3/commit/1e39affee762bc1c73cd94a4f2742d7437172885

>---------------------------------------------------------------

commit 1e39affee762bc1c73cd94a4f2742d7437172885
Author: Joseph Wright <joseph.wright at morningstar2.co.uk>
Date:   Tue Jul 11 09:59:46 2023 +0100

    s/once/first/g


>---------------------------------------------------------------

1e39affee762bc1c73cd94a4f2742d7437172885
 l3kernel/doc/l3obsolete.txt      |  2 --
 l3kernel/l3deprecation.dtx       | 18 ++++++------------
 l3kernel/l3text-case.dtx         |  8 ++++----
 l3kernel/testfiles/m3text002.lvt | 12 ++++++------
 4 files changed, 16 insertions(+), 24 deletions(-)

diff --git a/l3kernel/doc/l3obsolete.txt b/l3kernel/doc/l3obsolete.txt
index 5e24e0388..19a92eed3 100644
--- a/l3kernel/doc/l3obsolete.txt
+++ b/l3kernel/doc/l3obsolete.txt
@@ -55,8 +55,6 @@ Function                            Date deprecated
 \sys_load_deprecation:                   2021-01-11
 \text_titlecase:n                        2023-07-08
 \text_titlecase:nn                       2023-07-08
-\text_titlecase_first:n                  2023-07-08
-\text_titlecase_first:nn                 2023-07-08
 \tl_case:cn                              2023-05-23
 \tl_case:cnF                             2023-05-23
 \tl_case:cnT                             2023-05-23
diff --git a/l3kernel/l3deprecation.dtx b/l3kernel/l3deprecation.dtx
index 899cb668e..3db76a8bc 100644
--- a/l3kernel/l3deprecation.dtx
+++ b/l3kernel/l3deprecation.dtx
@@ -551,21 +551,15 @@
 %
 % \subsection{Deprecated \pkg{l3text} functions}
 %
-% \begin{macro}[EXP]{\text_titlecase:n, \text_titlecase_first:n}
-% \begin{macro}[EXP]{\text_titlecase:nn, \text_titlecase_first:nn}
+% \begin{macro}[EXP]{\text_titlecase:n}
+% \begin{macro}[EXP]{\text_titlecase:nn}
 %    \begin{macrocode}
-\__kernel_patch_deprecation:nnNNpn { 2023-07-08 } { \text_titlecase_once:n }
+\__kernel_patch_deprecation:nnNNpn { 2023-07-08 } { \text_titlecase_first:n }
 \cs_gset:Npn \text_titlecase:n #1
-  { \text_titlecase_once:n { \text_lowercase:n {#1} } }
-\__kernel_patch_deprecation:nnNNpn { 2023-07-08 } { \text_titlecase_once:n }
-\cs_gset:Npn \text_titlecase:n #1
-  { \text_titlecase_once:n {#1} }
-\__kernel_patch_deprecation:nnNNpn { 2023-07-08 } { \text_titlecase_once:nn }
+  { \text_titlecase_first:n { \text_lowercase:n {#1} } }
+\__kernel_patch_deprecation:nnNNpn { 2023-07-08 } { \text_titlecase_first:nn }
 \cs_gset:Npn \text_titlecase:nn #1#2
-  { \text_titlecase_once:nn {#1} { \text_lowercase:n {#2} } }
-\__kernel_patch_deprecation:nnNNpn { 2023-07-08 } { \text_titlecase_once:nn }
-\cs_gset:Npn \text_titlecase_first:nn #1#2
-  { \text_titlecase_once:nn {#1} {#2} }
+  { \text_titlecase_first:nn {#1} { \text_lowercase:n {#2} } }
 %    \end{macrocode}
 % \end{macro}
 % \end{macro}
diff --git a/l3kernel/l3text-case.dtx b/l3kernel/l3text-case.dtx
index c1ad855e9..acd26a205 100644
--- a/l3kernel/l3text-case.dtx
+++ b/l3kernel/l3text-case.dtx
@@ -78,14 +78,14 @@
 %     \text_lowercase:n,
 %     \text_uppercase:n,
 %     \text_titlecase_all:n,
-%     \text_titlecase_once:n
+%     \text_titlecase_first:n
 %   }
 % \begin{macro}[EXP]
 %   {
 %     \text_lowercase:nn,
 %     \text_uppercase:nn,
 %     \text_titlecase_all:nn,
-%     \text_titlecase_once:nn
+%     \text_titlecase_first:nn
 %   }
 % \begin{macro}[EXP]{\@@_change_case:nnn}
 %   The user level functions here are all wrappers around the internal
@@ -97,7 +97,7 @@
   { \@@_change_case:nnn { upper } { } {#1} }
 \cs_new:Npn \text_titlecase_all:n #1
   { \@@_change_case:nnn { title } { } {#1} }
-\cs_new:Npn \text_titlecase_once:n #1
+\cs_new:Npn \text_titlecase_first:n #1
   { \@@_change_case:nnnn { title } { break } { } {#1} }
 \cs_new:Npn \text_lowercase:nn #1#2
   { \@@_change_case:nnn { lower } {#1} {#2} }
@@ -105,7 +105,7 @@
   { \@@_change_case:nnn { upper } {#1} {#2} }
 \cs_new:Npn \text_titlecase_all:nn #1#2
   { \@@_change_case:nnn { title } {#1} {#2} }
-\cs_new:Npn \text_titlecase_once:nn #1#2
+\cs_new:Npn \text_titlecase_first:nn #1#2
   { \@@_change_case:nnnn { title } { break } {#1} {#2} }
 \cs_new:Npn \@@_change_case:nnn #1#2#3
   { \@@_change_case:nnnn {#1} {#1} {#2} {#3} }
diff --git a/l3kernel/testfiles/m3text002.lvt b/l3kernel/testfiles/m3text002.lvt
index 37ecd33f0..34be37def 100644
--- a/l3kernel/testfiles/m3text002.lvt
+++ b/l3kernel/testfiles/m3text002.lvt
@@ -20,7 +20,7 @@
       \NEWLINE
       \text_titlecase_all:n {#1}
       \NEWLINE
-      \text_titlecase_once:n {#1}
+      \text_titlecase_first:n {#1}
     }
   \cs_set:Npn \test:nn #1#2
     {
@@ -30,7 +30,7 @@
       \NEWLINE
       \text_titlecase_all:nn {#1} {#2}
       \NEWLINE
-      \text_titlecase_once:nn {#1} {#2}
+      \text_titlecase_first:nn {#1} {#2}
     }
 \TIMO
 
@@ -54,7 +54,7 @@
     {
       \text_titlecase_all:n {#1}
       \NEWLINE
-      \text_titlecase_once:n {#1}
+      \text_titlecase_first:n {#1}
     }
 \TIMO
 
@@ -66,11 +66,11 @@
     \NEWLINE
     "\text_titlecase_all:n { ~hello~world }"
     \NEWLINE
-    "\text_titlecase_once:n { ~hello~world }"
+    "\text_titlecase_first:n { ~hello~world }"
     \NEWLINE
     "\text_titlecase_all:n { ~HELLO~WORLD }"
     \NEWLINE
-    "\text_titlecase_once:n { ~HELLO~WORLD }"
+    "\text_titlecase_first:n { ~HELLO~WORLD }"
     \NEWLINE
     \testii:n { {h}ello~world }
     \NEWLINE
@@ -389,7 +389,7 @@
     \text_uppercase:n {#1} \NEWLINE
     \text_lowercase:n {#1} \NEWLINE
     \text_titlecase_all:n {#1} \NEWLINE
-    \text_titlecase_once:n {#1} \NEWLINE
+    \text_titlecase_first:n {#1} \NEWLINE
   }
 
 \TESTEXP { Case~change~switching }