From 9b9af3f98ce453fa388221fbb39b765facc75146 Mon Sep 17 00:00:00 2001
From: Karl Berry <karl@freefriends.org>
Date: Tue, 12 Oct 2021 20:07:20 +0000
Subject: l3 (12oct21)

git-svn-id: svn://tug.org/texlive/trunk@60743 c570f23f-e606-0410-a88d-b1316a301751
---
 .../tex/latex/l3backend/l3backend-dvips.def           | 19 ++++++++++---------
 1 file changed, 10 insertions(+), 9 deletions(-)

(limited to 'Master/texmf-dist/tex/latex/l3backend/l3backend-dvips.def')

diff --git a/Master/texmf-dist/tex/latex/l3backend/l3backend-dvips.def b/Master/texmf-dist/tex/latex/l3backend/l3backend-dvips.def
index cac3f268f18..7491d90db83 100644
--- a/Master/texmf-dist/tex/latex/l3backend/l3backend-dvips.def
+++ b/Master/texmf-dist/tex/latex/l3backend/l3backend-dvips.def
@@ -26,7 +26,7 @@
 %% 
 %% File: l3backend-basics.dtx
 \ProvidesExplFile
-  {l3backend-dvips.def}{2021-08-04}{}
+  {l3backend-dvips.def}{2021-10-12}{}
   {L3 backend support: dvips}
 \cs_if_exist:NTF \__kernel_dependency_version_check:nn
   {
@@ -125,29 +125,30 @@
   {
     \bool_if:NT \g__kernel_backend_header_bool
       {
-        \__kernel_backend_first_shipout:n
+        \exp_args:Nx \__kernel_backend_first_shipout:n
           {
-            \exp_not:N \__color_backend_separation_init_aux:nnnnn
+            \exp_not:N \__color_backend_separation_init_aux:nnnnnn
+              { \exp_not:N \int_use:N \g__color_model_int }
               {#1} {#2} {#3} {#4} {#5}
           }
       }
   }
 \cs_generate_variant:Nn \__color_backend_separation_init:nnnnn { nxx }
-\cs_new_protected:Npn \__color_backend_separation_init_aux:nnnnn #1#2#3#4#5
+\cs_new_protected:Npn \__color_backend_separation_init_aux:nnnnnn #1#2#3#4#5#6
   {
     \__kernel_backend_literal:e
       {
         !
         TeXDict ~ begin ~
-        /color \int_use:N \g__color_model_int
+        /color #1
           {
             [ ~
-              /Separation ~ ( \str_convert_pdfname:n {#1} ) ~
-              [ ~ #2 ~ ] ~
+              /Separation ~ ( \str_convert_pdfname:n {#2} ) ~
+              [ ~ #3 ~ ] ~
                 {
-                  \cs_if_exist_use:cF { __color_backend_separation_init_ #2 :nnn }
+                  \cs_if_exist_use:cF { __color_backend_separation_init_ #3 :nnn }
                     { \__color_backend_separation_init:nnn }
-                      {#3} {#4} {#5}
+                      {#4} {#5} {#6}
                 }
             ] ~ setcolorspace
           } ~ def ~
-- 
cgit v1.2.3

