summaryrefslogtreecommitdiff
path: root/Master/texmf-dist/tex/latex/ducksay/ducksay.code.v2.tex
diff options
context:
space:
mode:
authorKarl Berry <karl@freefriends.org>2018-12-30 22:12:44 +0000
committerKarl Berry <karl@freefriends.org>2018-12-30 22:12:44 +0000
commitfd0e6a66494a3aa9c7e6c66896ba52e83550804e (patch)
treeea164c21d668522bc1bd53be0cd2bcc05436b293 /Master/texmf-dist/tex/latex/ducksay/ducksay.code.v2.tex
parent282c8df613a31d818534f3408180e6a5cdc0fb1e (diff)
ducksay (30dec18)
git-svn-id: svn://tug.org/texlive/trunk@49545 c570f23f-e606-0410-a88d-b1316a301751
Diffstat (limited to 'Master/texmf-dist/tex/latex/ducksay/ducksay.code.v2.tex')
-rw-r--r--Master/texmf-dist/tex/latex/ducksay/ducksay.code.v2.tex30
1 files changed, 13 insertions, 17 deletions
diff --git a/Master/texmf-dist/tex/latex/ducksay/ducksay.code.v2.tex b/Master/texmf-dist/tex/latex/ducksay/ducksay.code.v2.tex
index 44cd4a1c4b7..66d11218951 100644
--- a/Master/texmf-dist/tex/latex/ducksay/ducksay.code.v2.tex
+++ b/Master/texmf-dist/tex/latex/ducksay/ducksay.code.v2.tex
@@ -159,6 +159,16 @@
,bubble-delim-right-4 .initial:n = /
,strip-spaces .bool_set:N = \l_ducksay_msg_strip_spaces_bool
}
+\cs_new:Npn \ducksay_evaluate_message_alignment_fixed_width_common:
+ {
+ \str_case:Vn \l_ducksay_msg_align_tl
+ {
+ { l } { \exp_not:N \l_ducksay_msg_align_l_tl }
+ { c } { \exp_not:N \l_ducksay_msg_align_c_tl }
+ { r } { \exp_not:N \l_ducksay_msg_align_r_tl }
+ { j } { \exp_not:N \l_ducksay_msg_align_j_tl }
+ }
+ }
\cs_new:Npn \ducksay_evaluate_message_alignment_fixed_width_tabular:
{
\tl_if_empty:NT \l_ducksay_msg_tabular_column_tl
@@ -167,13 +177,7 @@
{
>
{
- \str_case:Vn \l_ducksay_msg_align_tl
- {
- { l } { \exp_not:N \l_ducksay_msg_align_l_tl }
- { c } { \exp_not:N \l_ducksay_msg_align_c_tl }
- { r } { \exp_not:N \l_ducksay_msg_align_r_tl }
- { j } { \exp_not:N \l_ducksay_msg_align_j_tl }
- }
+ \ducksay_evaluate_message_alignment_fixed_width_common:
\exp_not:N \arraybackslash
}
p { \exp_not:N \l_ducksay_msg_width_dim }
@@ -183,15 +187,7 @@
\cs_new:Npn \ducksay_evaluate_message_alignment_fixed_width_vbox:
{
\tl_set:Nx \l_ducksay_msg_align_vbox_tl
- {
- \str_case:Vn \l_ducksay_msg_align_tl
- {
- { l } { \exp_not:N \l_ducksay_msg_align_l_tl }
- { c } { \exp_not:N \l_ducksay_msg_align_c_tl }
- { r } { \exp_not:N \l_ducksay_msg_align_r_tl }
- { j } { \exp_not:N \l_ducksay_msg_align_j_tl }
- }
- }
+ { \ducksay_evaluate_message_alignment_fixed_width_common: }
}
\cs_new:Npn \ducksay_calculate_msg_width_from_int:
{
@@ -466,7 +462,6 @@
\bool_if:NTF \l_ducksay_msg_strip_spaces_bool
{ \grabbox }
{ \grabbox* }
- \l_ducksay_msg_box
[
\hsize \l_ducksay_msg_width_dim
\linewidth \hsize
@@ -475,6 +470,7 @@
\@afterindentfalse
\@afterheading
]
+ \l_ducksay_msg_box
\vbox \ducksay_shipout:
}
\cs_generate_variant:Nn \coffin_join:NnnNnnnn { NVnNVnnn }