[latex3-commits] [git/LaTeX3-latex3-pdfresources] master: change scratch box to expl3 (a075311)

[Ulrike Fischer]

Repository : https://github.com/latex3/pdfresources
On branch  : master
Link       : https://github.com/latex3/pdfresources/commit/a075311bfac34f9b82a50fae5ed3e27fbefeaa60

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

commit a075311bfac34f9b82a50fae5ed3e27fbefeaa60
Author: Ulrike Fischer <fischer at troubleshooting-tex.de>
Date:   Sat Mar 21 00:58:43 2020 +0100

    change scratch box to expl3


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

a075311bfac34f9b82a50fae5ed3e27fbefeaa60
 hgeneric-experimental.def | 11 +++++++----
 1 file changed, 7 insertions(+), 4 deletions(-)

diff --git a/hgeneric-experimental.def b/hgeneric-experimental.def
index 6762136..1c7a9b1 100644
--- a/hgeneric-experimental.def
+++ b/hgeneric-experimental.def
@@ -21,6 +21,7 @@
 %% \g__hyp_AcroForm_CoFields_prop
 %% \g__hyp_AcroForm_Fields_prop
 %% \l__hyp_tmpa_seq
+%% \l__hyp_tmpa_box
 %% \l__hyp_CheckmarkYes_tl
 %% \l__hyp_CheckmarkOff_tl
 %% \l__hyp_RadioYes_tl
@@ -101,6 +102,8 @@
 \cs_generate_variant:Nn \pdf_object_write:nn {nx}
 \cs_generate_variant:Nn \pdf_catalog_gput:nn {nx}
 
+% tmp
+\box_new:N \l__hyp_tmpa_box
 
 %%% pdfa key:
 \bool_new:N \l__hyp_pdfa_bool
@@ -461,7 +464,7 @@
             \legacy_if:nTF {Hy at ocgcolorlinks}
               {
                 \def\Hy at ocgcolor{#1}
-                \setbox0=\hbox\bgroup\color at begingroup
+                \hbox_set:Nw \l__hyp_tmpa_box
               }
               {
                 \HyColor at UseColor#1
@@ -471,16 +474,16 @@
          {
            \legacy_if:nT {Hy at ocgcolorlinks}
              {
-               \color at endgroup\egroup
+               \hbox_set_end:
                \mbox
                  {
                    \pdf_bdc:nn {OC}{l__hyp_ocg_print_dict_obj}
-                   \rlap{\copy0}
+                   \hbox_overlap_right:n { \box_use:N \l__hyp_tmpa_box }
                    \pdf_emc:
                    \pdf_bdc:nn {OC}{l__hyp_ocg_view_dict_obj}
                    \group_begin:
                    \expandafter\HyColor at UseColor\Hy at ocgcolor
-                   \box0~
+                   \box_use_drop:N \l__hyp_tmpa_box
                    \group_end:
                    \pdf_emc:
                 }