\edef\k@series{\expandafter\series@drop@one@m\k@series mm\series@drop@one@m}%
}
\def\merge@kanji@series@#1#2#3\@nil{%
- \def\@reserveda{#3}%
- \ifx\@reserveda\@empty
+ \def\reserved@a{#3}%
+ \ifx\reserved@a\@empty
\set@target@series@kanji{#2}%
\else
\begingroup\let\f@encoding\k@encoding\let\f@family\k@family
\maybe@load@fontshape\endgroup
- \edef\@reserveda{\k@encoding /\k@family /#1/\k@shape}%
- \ifcsname \@reserveda \endcsname
+ \edef\reserved@a{\k@encoding /\k@family /#1/\k@shape}%
+ \ifcsname \reserved@a \endcsname
\set@target@series@kanji{#1}%
\else
\ifcsname \k@encoding /\k@family /#2/\k@shape \endcsname
\@nil
}
\def\merge@kanji@shape@#1#2#3\@nil{%
- \def\@reserveda{#3}%
- \ifx\@reserveda\@empty
+ \def\reserved@a{#3}%
+ \ifx\reserved@a\@empty
\edef\k@shape{#2}%
\else
\begingroup\let\f@encoding\k@encoding\let\f@family\k@family
\maybe@load@fontshape\endgroup
- \edef\@reserveda{\k@encoding /\k@family /\k@series/#1}%
- \ifcsname \@reserveda\endcsname
+ \edef\reserved@a{\k@encoding /\k@family /\k@series/#1}%
+ \ifcsname \reserved@a\endcsname
\edef\k@shape{#1}%
\else
\ifcsname \k@encoding /\k@family /\k@series/#2\endcsname